Отловить сообщение завршения Windows

← →
AVK (2004-06-04 22:37) [0]

Проблема в том, что моя программа сидит в трее и при ее закрытии выводит диологовое окно подтверждения закрытия. при завершении работы Windows он неможет ее сам закрыть. Надо поймать такое сообщение и не выводить диалог.
P.S. Если такой вопрос уже звучал и я его не заметил просто киньте ссылочку.

← →
sniknik © (2004-06-05 01:54) [1]

http://www.delphimaster.ru/cgi-bin/forum.pl?n=5&search=WM_QUERYENDSESSION

← →
grom (2004-06-05 14:29) [2]

procedure TForm2.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin

end;

← →
AVK (2004-06-06 11:13) [3]

... procedure WMENDSESSION(var M:TMessage);message WM_ENDSESSION; ... procedure TForm1.WMQUERYENDSESSION(var M: TMessage); begin WINDOWSENDSESSION := true;//глобальная переменная. Если true, то не показываем диалог о закрытии приложения. Close; end;
При завершении работы/перезагрузке Windows приложение закрывается, но Windows не завершает работу и не перезагружается. Чего не хватает в коде?

← →
AVK (2004-06-06 12:45) [4]

Прошу прощения, объявлена процедура WMQUERYENDSESSION, а не WMENDSESSION.

← →
Kair © (2004-06-06 20:01) [5]

Может у тебя в системе какая-то еще программа сидит, в которой написавший её программист не предусмотрел отлов wm_QueryEndSession...

← →
sniknik © (2004-06-06 20:14) [6]

попробуй так
procedure TForm1.OnCloseSession(var Mess: TMessage); //WM_QUERYENDSESSION begin try inherited; Destroy; except {NOTHING} end; end;

← →
AVK (2004-06-06 22:39) [7]

Не помогло. Даже если я делаю так
procedure TForm1.WMQUERYENDSESSION(var M: TMessage);//WM_QUERYENDSESSION begin inherited; end;
то все равно приложение не может завершить работу(диалог о подтверждении завершения отключен). Если закоментировать данную процедуру, то все работает. Или я как-то некоректно ее обрабатываю или что... я не знаю.

в переменной m.Result (кажется) надо возвращать какое-то значение.

← →
AVK (2004-06-07 16:45) [9]

Да вроде единичку надо, но все равно не получается.

← →
AVK (2004-06-07 16:46) [10]

Да вроде единичку надо, но все равно не получается.

Отловить сообщение завршения Windows Найти похожие ветки