Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

try..except не работает [D5, Win95/98]


Страницы:   1 2

Basilio ©   (2002-04-23 16:59:00) 

почему-то блок try..except не обрабатывает исключения
(или обрабатывает, но не все)
вот кусок кода:

(в главной форме)
try
...
MyForm:=TMyForm.Create(self);
...
except
ShowCrashMsg;
end;
...

внутри TMyForm возбуждается исключение EConvertError
(функция FileDateToDateTime для неправильной даты)
except не ловит это исключение.
если я поставлю

try
DOSDateTime:=FileGetDate(Handle); // для несущ. файлов handle=-1
DateTime:=FileDateToDateTime(DOSDateTime);
except
ShowCrashMsg;
end;

внутри TMyForm.Create, то исключение ловится именно в этом месте,
а не на уровень выше (по вложенности вызовов).
почему не работает на более верхнем уровне?


ZZ   (2002-04-23 17:06:00) [21]

попробуй
except
on EConvertError do ShowCrashMsg;

или
except
else ShowCrashMsg;


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо