| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

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

FVova ©   (2004-01-18 09:03:00) 

Когда запущены моя программа и пользователь выбирает "Пуск->Завершение работы", то комп не выключается и программа не закрывается, нашёл на форуме что надо обрабатывать сообщение WM_QUERYENDSESSION

PROCEDURE TForm_Main.WMQueryEndSession(var Message: TWMQueryEndSession);
BEGIN
Message.Result := Integer(true);
END;

Только это не помогает, завершение работы всё равно не происходит!

---

Alex Konshin   (2004-01-20 09:37:00) [1]


procedure TfmToolBar.WMQueryEndSession(var Message: TWMQueryEndSession);
begin
 // Тут могут быть твои завершающие действия, но ни в коем случае нельзя создавать никаких окошек, даже неявно.  
 Message.Result := Integer(CallTerminateProcs);
 Application.Terminate;
end;


---

FVova   (2004-01-20 08:38:00) [2]

Винда ХР, событие OnCloseQuery я вообще не обрабатываю

---

Suntechnic   (2004-01-20 08:05:00) [3]

>FVova
Что у тебя в событии формы OnCloseQuery (так оно по-моему называется) написано?

---

Holy   (2004-01-19 14:32:00) [4]

А ты уверен, что дело именно в этом? Может ты отказываешься закрыть форму или еще что-то подобное... Кстати, а винда какая?

---

Наверх