Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.11;
Скачать: 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 вся ветка

Текущий архив: 2002.11.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
14-34244
Bis
2002-10-23 13:36
2002.11.11
А не сделать ли из интересных глюков задачки ?


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


1-34021
[NEW]Splinter
2002-11-02 19:57
2002.11.11
Помогите с <B>TFileStream</B>...


3-33873
Alessandro
2002-10-16 10:53
2002.11.11
Программа не запускается на других машинах


14-34161
Beginner-Designer
2002-10-24 15:45
2002.11.11
Что такое константа?