🚀 go-pugleaf

"qyte" <gyte@vivodinet.gr> schrieb im Newsbeitrag 
news:42c5edce$1@newsgroups.borland.com...
...
> I have intercepted it using the WndProc of the main form
> but nothing happens. is there something wrong with that?

This is how to create the event handler:

main.h

class TMainForm : public TForm
{
__published: // Von der IDE verwaltete Komponenten
 TCheckBox *cbEndSession;
 TMemo     *Memo;
private: // Anwender-Deklarationen
public:  // Anwender-Deklarationen
 __fastcall TMainForm(TComponent* Owner);
protected:
 void __fastcall WMQueryEndSession(TMessage &Message);
BEGIN_MESSAGE_MAP
  VCL_MESSAGE_HANDLER(WM_QUERYENDSESSION, TMessage, WMQueryEndSession)
END_MESSAGE_MAP(TComponent)
};

main.cpp
void __fastcall TMainForm::WMQueryEndSession(TMessage &Message)
{
 AnsiString s;
 if (Message.LParam == (long) ENDSESSION_LOGOFF)
   s = "QueryEndSession: Log off";
 else
   s.sprintf("QueryEndSession: %ld", Message.LParam);
 Memo->Lines->Add(s);
 if (cbEndSession->Checked)
   Memo->Lines->Add("Allowing end of session");
 else
   Memo->Lines->Add("Denying end of session");
 Message.Result = cbEndSession->Checked;
}