Главная страница
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.05 c
15-1171010742
Kolan
2007-02-09 11:45
2007.03.04
Ухты, for I := 1 to Length(FData) do, BDS сама объявила I :)


2-1171096473
Kolan
2007-02-10 11:34
2007.03.04
Как установить свой компонент в IDE?


15-1170702104
@!!ex
2007-02-05 22:01
2007.03.04
Есть у кого OpenSuse 10.2???


15-1168802470
Moholith
2007-01-14 22:21
2007.03.04
Клиент - Сервер; Запрос - Ответ;


2-1171293000
MAX3
2007-02-12 18:10
2007.03.04
Excel