Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.11.11;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.133 c
1-33978
НгкфТШялш
2002-11-01 15:10
2002.11.11
Как перевести шестнадцатиричное в строку?


1-34078
Sania
2002-10-30 16:06
2002.11.11
Не хочу я это видеть!!!


14-34225
STANT
2002-10-16 17:18
2002.11.11
Как отсортировать БД?


14-34208
AL2002
2002-10-22 12:58
2002.11.11
Мне тут такую фигню админ сообщил...


1-34080
Anonimus
2002-10-30 14:18
2002.11.11
Как узнать в какой кодировке находиться файл....





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский