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

События при завершении приложения?   Найти похожие ветки 

← →
TankMan ©   (2002-10-30 18:20) [0]

Я вод задался вопросом, какие события происходят при завершении приложения, вот например у меня, форма, на OnClose(или OnHide,OnDestroy) допустим выдается сообщение, какое нибудь, И оно выдается, когда я нажимаю на крестик, в верхнем углу, но есть на форме конопочка - "выход", где прописано Application.Terminate, и когда я нажимаю на ЭТУ кнопочку, то сообщений никаких нет. Почему? Ведь форма то закрывается, почему не происходит OnClose? И вообще, как отловить, такое закрытие?


← →
TTCustomDelphiMaster ©   (2002-10-30 20:54) [1]

Вместо Application.Terminate вызывайте Application.MainForm.Close;

Ну а если желаете сделать что то после Application.Terminate используйте finalization section

...
var
F: TextFile;
implementation
....

initialization

finalization
begin
AssignFile(F, "c:\aa.txt");
Rewrite(F);
Writeln(F, "Приложение закрыто в "+TimeToStr(Time()));
CloseFile(F);
end;


← →
TankMan ©   (2002-10-30 21:50) [2]

А можно как-то отловить это по раньше, просто мне нужно обработать закрытие, до того, как все комопненты уничтожены, напрмер выдать сообщение какое нибудь, перед завершением, но не писать везде Application.Mainform.Close;
А то получается, когда нажимаю Alt+F4 - сообщение появляется, а когда нажимаю Exit сообщения нет. Я раньше это делал как-то вроде на Дельфи, но очень давно и не помню... :(


← →
TTCustomDelphiMaster ©   (2002-10-30 22:10) [3]


> но не писать везде Application.Mainform.Close;


Замените Application.Terminate на Application.Mainform.Close. Больше ничего не надо.


← →
TankMan ©   (2002-10-30 23:14) [4]

Я вот не пробовал,но когда по верх главного окна открыто еще куча модальных, точнее модальным отрыто одно окно, на нем отрыто еще одно модальное, и т.д. и в любом месте воспользовавшить, Application.MainForm.Close программа закроеться полностью?



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

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



Память: 0.46 MB
Время: 0.014 c
14-34180
Дремучий
2002-10-21 15:28
2002.11.11
сложная ли задача - понять закономерность?


1-34043
Darkwin
2002-10-29 19:38
2002.11.11
Как немножко подкорректировать компонент? :))


7-34269
Gero
2002-09-09 11:07
2002.11.11
Запуск программ в Windows


7-34284
Lexx@demon
2002-09-09 20:46
2002.11.11
Как посчитать количество напечатанных страниц


6-34153
Oleg_Gashev
2002-09-11 23:56
2002.11.11
beginthread & socket




   Наверх