Недопонимания try...except

[Cerebrum]

Надо сделать проверку, что в edit ввели вещественное число...пишу код:

procedure TForm1.edit1Change(Sender: TObject);
  var i:integer;
      df:string;
begin
  try
    df:=edit1.Text;
    for i:=1 to length(df) do
      if df[i]=',' then df[i]:='.';
    mashtab:=strtofloat(df);    //mashtab-глобальная переменная.
  except
     showmessage('Введите корректно число');
  end;
end;

Вылетает при вводе допустим буквы, что меня не радует...справку почитал, там вроде все так и написано...
Я не силен в английском и может недопонял что-то в справке?(

[Скандербег]

В этой ситуации проще применить функцию

if not TryStrToFloat(df, mashtab) then 
   showmessage('Введите корректно число');

или вместо TEdit использовать TMaskEdit, где по маске не будет возможности ввести иные символы, чем цифры и корректные знаки.

[Квэнди]

Запустите без IDE. При запущенном из IDE приложени ( при условии выставления в настройках "перехватывать run-time исключения",,которая стоит по умолчанию то в случае возникновения исключения, управление передастся отладчику Delphi. Если в появившемся окне вы нажмете "continue", то отработает ваш перехватчик исключения. Если запустить приложение без IDE или отключить,указанный выше, параметр, то управление отладчику передаваться не будет и вы увидите работу своей программы "как есть"

[Cerebrum]

И то, и другое заработало, Спасибо огромное)