![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Закрытие формы в OnShow
Bless © (2006-08-21 10:57:00)Как закрыть форму в случае возникновения исключения в обработчике события OnShow.
Т.е. что-то в духе
procedure TForm1.FormShow(Sender: TObject);
begin
try
ViewData;
except
?????????; //Close? PostMessage(handle, WM_CLOSE, 0, 0)?
raise;
end;{try}
end;
что поставить вместо "?????????"
Чапаев (2006-08-21 11:21:00) [41]С закрытием формы из OnShow действительно проблемы. Мне приходилось ставить таймер, который закрывал форму после небольшого промежутка времени.
tesseract (2006-08-21 11:04:00) [42]попробуй
try
except
on e:Exception do ........
end;