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

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

Закрытие формы в OnShow


Страницы:   1 2 3

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;


Страницы:   1 2 3

Наверх

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