Прга в Tray не завершается вместе с Windows
Если поместить прогу на Delphi в трей м попытатся вырубить Windows то он даже не выводит сообщения что прога зависла а просто ничего не делает и продолжает работать :)
Как ее все-таки вырубить? ))
Как ее все-таки вырубить? ))
Цитата:
Originally posted by Proger_XP
Если поместить прогу на Delphi в трей м попытатся вырубить Windows то он даже не выводит сообщения что прога зависла а просто ничего не делает и продолжает работать :)
Как ее все-таки вырубить? ))
Если поместить прогу на Delphi в трей м попытатся вырубить Windows то он даже не выводит сообщения что прога зависла а просто ничего не делает и продолжает работать :)
Как ее все-таки вырубить? ))
Windows при выключении посылает всем приложениям сообщение WM_QUERYENDSESSION надо просто написать обработчик этого сообщения
private
{ Private declarations }
procedure WMQueryEndSession(
var Message: TWMQueryEndSession); message WM_QUERYENDSESSION;
..............................
procedure TForm1.WMQueryEndSession(var Message: TWMQueryEndSession);
begin
inherited;
halt;
end;
Цитата:
Originally posted by Delpher
Windows при выключении посылает всем приложениям сообщение WM_QUERYENDSESSION надо просто написать обработчик этого сообщения
Windows при выключении посылает всем приложениям сообщение WM_QUERYENDSESSION надо просто написать обработчик этого сообщения
Ясно
А если прога не в трее то он посылает просто WM_QUIT что ли?
Цитата:
Originally posted by Proger_XP
Ясно
А если прога не в трее то он посылает просто WM_QUIT что ли?
Ясно
А если прога не в трее то он посылает просто WM_QUIT что ли?
Не важно где находится. Всем программам WM_QUERYENDSESSION