Как отловить перезагрузку или выключение Win2000

← →
Alex* (2004-04-30 14:43) [0]

Subj

← →
Игорь Шевченко © (2004-04-30 14:44) [1]

WM_QUERYENDSESSION

← →
Alex* (2004-04-30 14:48) [2]

Не работает. В программе при появлении команды перезагрузки должно выполняться функция сохранения параметров. На WM_QUERYENDSESSION не реагирует

← →
Игорь Шевченко © (2004-04-30 14:49) [3]

Alex* (30.04.04 14:48)

Обычно работает. Может, код неправильный ?

← →
Alex* (2004-04-30 14:52) [4]

procedure TForm1.WMTRAYICONNOTIFY(var Msg: TMessage); var frmClose:TCloseAction; begin // frmClose:=caFree ; case Msg.LParam of WM_LBUTTONDOWN: Form1.Visible:=true; WM_RBUTTONDOWN: Form1.Visible:=false; WM_QUERYENDSESSION: SaveIni; //FormClose(self, frmClose); { Народное творчество. точнее ипробованные варианты WM_CLOSE: SaveIni; //FormClose(self, frmClose); WM_ENDSESSION: SaveIni; WM_DESTROY: SaveIni; WM_KILLFOCUS: SaveIni; WM_CHILDACTIVATE: SaveIni; WM_IME_ENDCOMPOSITION: SaveIni; WM_DEVICECHANGE: SaveIni;} end; // if Msg.LParam == WM_ACTIVATE end;

Код взят из форума

← →
Alex* (2004-04-30 14:53) [5]

Рука дрогнула. И немного модифицирован

← →
clickmaker © (2004-04-30 15:07) [6]

А WMTRAYICONNOTIFY в ответ на что приходит ?

← →
Игорь Шевченко © (2004-04-30 15:08) [7]

>Код взят из форума

Наверное, лучше у автора кода спросить ? Я пока не вижу, почему именно в этот метод должно приходить сообщение WM_QUERYENDSESSION

← →
Alex* (2004-04-30 15:20) [8]

> clickmaker © (30.04.04 15:07) [6]

Мысль понял. В процедуре procedure TForm1.FormCreate(Sender: TObject). Тока как ее FormClose воткнуть.

← →
Alex* (2004-04-30 15:21) [9]

← →
Alex* (2004-04-30 15:40) [10]

УРА!!! Все получилось

> Игорь Шевченко © (30.04.04 15:08) [7]

Огромное Спасибо за подсказки

> clickmaker © (30.04.04 15:07) [6]
> А WMTRAYICONNOTIFY в ответ на что приходит ?

Особенное Огромное Спасибо за правельно заданный вопрос.

Как отловить перезагрузку или выключение Win2000 Найти похожие ветки