Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.03.04;
Скачать: CL | DM;

Вниз

Непойму как обработать Exception.   Найти похожие ветки 

 
Kolan ©   (2007-02-14 10:50) [0]

except
       on E: EDeviceProtocolException do
       begin
         ErrorsCount := ErrorsCount + 1;
         if ErrorsCount > Trys then
         begin
           FException := E;
           Synchronize(DoException);
           raise;
         end;
       end;
     end;


Сейчас:
 Если Е - EDeviceProtocolException, то сохраняю её( FException := E;) и.. все написано вообщем.

Как хочу:
Если Е - EDeviceProtocolException, то сохраняю её( FException := E;);
А если нет, то все равно сохраняю( FException := E;), и делю что-то еще.

Как сделать такое?


 
Плохиш ©   (2007-02-14 10:52) [1]

on E:Exception do
...


 
Сергей М. ©   (2007-02-14 11:58) [2]


> Kolan ©   (14.02.07 10:50)


> А если нет, то все равно сохраняю( FException := E;), и
> делю что-то еще.


Что конкретно ?
От этого и решение зависит.



Страницы: 1 вся ветка

Текущий архив: 2007.03.04;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.048 c
1-1167498291
Piroxyline
2006-12-30 20:04
2007.03.04
Object Manager


15-1170942232
SergP
2007-02-08 16:43
2007.03.04
Кто-нить настраивал Squid под линухом?


4-1160660875
red_imp
2006-10-12 17:47
2007.03.04
Работа с com портами


2-1171217832
Litestone
2007-02-11 21:17
2007.03.04
StringGrid


15-1170829866
torch_of_justice
2007-02-07 09:31
2007.03.04
Орнамент, плитка