|
#1
|
|||
|
|||
try except
привет.
У меня вопрос , а почему try except срабатывает не всегда. Вообщем вот пример 1ая процедура Код:
try //грузим jpeg в timage except Showmessage('error'); end; 2ая процедура Код:
try // в цикле сохраняем и загружаем картинки в timage except Showmessage('error'); end; Вопрос : почему во 2ой процедуре ловится исключение а в 1ой нет ? Тоесть во второй выводится мой showmessage , а в 1ой стандартная ошибка . Вроде все правильно написано. В коде ошибок нет , компилируется проект без ошибок. Спасибо. |
#2
|
||||
|
||||
У меня в обоих случаях ловится сообщение!
|
#3
|
||||
|
||||
Приведи полный код
|
#4
|
||||
|
||||
Запускай не из Delphi или отключи обработку исключительных ситуаций.
PS: Все тип-топ. |
#5
|
|||
|
|||
Код:
try for i:=0 to jlist.items.count -1 do begin with Timage.create(form1) do begin Parent:=form1; Left:=x; Top:=y; picture.loadfromfile(jlist.items.strings[i]); autosize:=true; x:=x+width; end; end; except Showmessage('error'); end; Тут все ловится . А вот тут нет . Код:
try (sender as Timage).picture.loadfromfile(jlist.items.strings[jlist.itemindex]); except Showmessage('error'); end; |
#6
|
||||
|
||||
У меня в обоих случаях ловится.
|
#7
|
|||
|
|||
По идеи должно все прекрасно ловится , а вот не ловится и все тут.
|