Обработка ошибки!!!!

← →
aade (2003-02-28 22:23) [0]

В текстовом поле вводятся екоторые данные.Они должны быть числом.Я использую следующую конструкцию проверки:
procedure TFrmTabl.CmdOKClick(Sender: TObject);
Var
aaa:Currency;
begin
Try
aaa:=strToCurr(txtDannie.text);
Except
ShowMessage("Это не число!");
End;
end;
Т.е. по идее если это не число,то должна возникнуть ошибка и выдасться сообщение.Но этого не происходит.Delphi Дает критическое сообщение,после выполнения данной строки:
Project Project1.exe raised exception class EConvertErrror with message "asdsds" is not valid floating point value.Process Stoped.
Почему????Ведь я же использую оператор Try?

← →
Anatoly Podgoretsky © (2003-02-28 22:25) [1]

Может ты в ИДЕ запускаешь?

← →
Артём В. (2003-02-28 22:28) [2]

А ты попробуй EXE запустить

Tools|Debugger Options|Language Exceptions и сбросить флажок Stop on Delphi Exceptions

Обработка ошибки!!!! Найти похожие ветки