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

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

Закрытие формы. [D7, Win2k]


Lera ©   (2005-11-08 14:35:00) 

Здравствуйте, у меня по onShow вызывается процедура. По результатам ее работы нужно либо открывать форму, либо нет. Может быть кто-нибудь знает, как после попадания в FormShow сделать так, чтобы форма не открылась и выйти из FormShow. Заранее благодарю.


Prohodil Mimo   (2005-11-10 20:29:00) [1]

Плохиш ©   (10.11.05 1:24) [13]
AV обеспечено.


только в том случае, если форма на тот момент ещё не создана. Но OnCreate выполняется уже после создания формы - следовательно никакого AV не будет.


ShiFT   (2005-11-10 05:57:00) [2]


> AV обеспечено.

из-за Application.ShowMainForm := false;
AV не вылетает.
Так как форма создаётся но не показывается. =)

если я не прав, то объясни почему будет AV.


Плохиш   (2005-11-10 01:24:00) [3]


> ShiFT   (09.11.05 06:12) [11]
> а я бы сделал так:
> // unit
> procedure TForm1.FormCreate(Sender: TObject);
> begin
>  if not Proc then
>    Form1.Show
>  else
>    Application.Terminate;
> end;

AV обеспечено.


Prohodil Mimo   (2005-11-10 01:18:00) [4]

Lera   (08.11.05 14:35)
у меня по onShow вызывается процедура


надо не на onShow вызывать процедуру, а вызывать процедуру, а уж из неё Show или ShowModal.


ShiFT   (2005-11-09 06:12:00) [5]

а я бы сделал так:

// dpr
 Application.ShowMainForm := false;

// unit
procedure TForm1.FormCreate(Sender: TObject);
begin
 if not Proc then
   Form1.Show
 else
   Application.Terminate;
end;


Anatoly Podgoretsky   (2005-11-08 19:53:00) [6]

umbra ©   (08.11.05 15:24) [7]
О результатах сообщи.


Leonid Troyanovsky   (2005-11-08 17:51:00) [7]


> Silver Alex ©   (08.11.05 16:38) [8]
> << PostMessage(Handle,WM_CLOSE,0,0);

> а просто self.Close; не подходит?


Нет.
Вариантов, собс-но: [2] vs [6].
Причем, необходимость применения первого вопиет о bad design.

--
Regards, LVT.


Silver Alex   (2005-11-08 16:38:00) [8]

<< PostMessage(Handle,WM_CLOSE,0,0);

а просто self.Close; не подходит?


umbra   (2005-11-08 15:24:00) [9]

2 Anatoly Podgoretsky ©   (08.11.05 15:13) [6]

глубоко! есть над чем подумать :))


Anatoly Podgoretsky   (2005-11-08 15:13:00) [10]

umbra ©   (08.11.05 15:00) [3]
Вопрос о показе лучше решать до Show


Ega23   (2005-11-08 15:08:00) [11]

Вообще-то лучше не на OnShow такое вешать....


umbra   (2005-11-08 15:00:00) [12]

да и по смыслу вопрос о том, показывать форму или нет лучше решать в  обработчике OnCreate


Lera   (2005-11-08 15:00:00) [13]

спасибо


Black Krok   (2005-11-08 14:55:00) [14]

В этом случае будет исключение "Cannot change Visible in OnShow or OnHide"

Так в лоб не получится.

Можно послать сообщение

if myproc then
 PostMessage(Handle,WM_CLOSE,0,0);


umbra   (2005-11-08 14:42:00) [15]

if myproc then Visible := False;

или надо вообще приложение закрыть?


Наверх

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