Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Программа в трее!
Форум программистов > Системное программирование > Delphi и Pascal > Delphi - Система
mersedes-great
Я написал простенькую программу которая висит в трее. Но когда я выключаю компьютер прога не завершается и так и висит там. Компьютер выключается только когда в самой проге нажать выход. На какое событие надо прописать выход, чтобы при выключении компа она корректно завершалась?
----------------
Подскажите плиз
Silver Wind
TfmMain = class(TForm)
...
private
procedure OnCompOff(var Msg:TMessage); message WM_QUERYENDSESSION;
...
end;

...
implementation
...

procedure TfmMain.OnCompOff(var Msg:TMessage);
begin
Close;
Msg.Result:=1;
end;
etc
Цитата(Silver Wind @ 17:07:2008 - 08:01) *
Close;
Надо бы еще в клозквери посмотреть, а то всякое бывает.
Silver Wind
Ну это я в минимальном варианте привел, а так, да, если нужно, можно еще специальный флаг предусмотреть для того, чтобы CloseQuery отрабатывал без запроса к пользователю.
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.
Форум IP.Board © 2001-2008 IPS, Inc.