Вниз
Скачать: CL | DM;

Закрытие проги после закрытия ПОСЛЕДНЕГО окна?   Найти похожие ветки 

 
IDL   (2002-04-24 12:54) [0]

В проге при закрытии главной ( первой созданной) формы, программа завершается. А как сделать, чтобы она завершалась только после закрытия всех окон?
Желательно не создавать для этого главное окно скрытым.


 
Song ©   (2002-04-24 12:58) [1]

Никак. После закрытия главной приложение будет всегда закрываться.
Вариант - скрывать главную форму и высвечивать все остальные.
TApplication.ShowMainForm


 
Anatoly Podgoretsky ©   (2002-04-24 13:00) [2]

В событии OnCloseQuery ставишь CanClose := FALSE если есть хоть одна открытая форма, надеюсь ты именно о формах говоришь, а не об окнах, иначе твоя задача трудно разрешима.


 
Deus ©   (2002-04-24 13:54) [3]

Ещё вариант: не делать главной формы.
т.е. в .dpr убрать application.run, а вставить цикл обработки сообщений.
И соответственно проверять на nil все формы....


 
IDL   (2002-04-24 14:02) [4]

Anatoly Podgoretsky
Да, я именно о формах и говорил.
CanClose не подходит - форма должна закрываться, раз ее просят :) но есть же и остальные, которые закрывать не надо.

Deus
У меня есть список всех форм в TList, можно попробовать и в цикле, но циклы = загрузке процессора :( Хотя может и нет - попробую.


 
PaRL ©   (2002-04-24 14:06) [5]

Или можно просто сделать главной форму другую при обработке Close...



 
Deus ©   (2002-04-24 14:14) [6]

2IDL (24.04.02 14:02):
В dpr делаешь счётчик кол-ва форм. При уничожении формы этот счётчик умешьшается на 1 и проверяется на =0.

2PaRL © (24.04.02 14:06):
Это как?


 
IDL   (2002-04-24 16:04) [7]

Вроде работает.
repeat
Sleep(50);
Application.processMessages;
until List.Count<=0;




Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.018 c
1-26122
Mic_2k
2002-04-24 17:11
2002.05.09
Как можно прорисовать табличку в Excel из Delphi


3-26044
Саша
2002-04-17 06:50
2002.05.09
undeclared identifier ttdbase


1-26185
AlexKniga
2002-04-24 16:26
2002.05.09
Разница м/у моим любимым TP7 и Delphi


1-26188
PaRL
2002-04-25 16:04
2002.05.09
*INI


1-26193
Freek
2002-04-25 15:46
2002.05.09
Как найти файл в реестре?




   Наверх