| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Непойму как обработать Exception.
Kolan © (2007-02-14 10:50:00)
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 11:58:00) [1]
> Kolan © (14.02.07 10:50)
> А если нет, то все равно сохраняю( FException := E;), и
> делю что-то еще.
Чтоконкретно ?
От этого и решение зависит.
Плохиш (2007-02-14 10:52:00) [2]
on E:Exception do
...
| |
