Try Except

← →
pashaz (2003-11-04 19:20) [0]

Господа, вопрос:
Нужно чтобы если вводимый символ не цифра, вылетало окошко.
Вот код:

begin
try
x:=StrToInt(Edit7.Text);
Edit6.Text:=FloatToStr(StrToFloat(Edit5.Text)*x);
except
MessageDlg("

← →
mOOx_ (2003-11-04 19:22) [1]

Так а ты запускай не по ф9, а по ярлычку на рабочем столе :)

← →
pashaz (2003-11-04 19:24) [2]

Спасибо, а я дурак мучаюсь )))

← →
Narayan (2003-11-04 19:28) [3]

Вызывается исключение если не экзешник запускать, а по F9, так?
А если экзешник, то всё нормально.
В меню " \Tools\Debugger Options " посмотри.

← →
mOOx_ (2003-11-04 19:29) [4]

Да ладна, просто я тоже молодость вспомнил :).
ЗЫ. Ох и секса было в те годы :).

Try Except Найти похожие ветки