Möglichkeit einleiten des Ruhezustandes abzufangen

[plumper]

Hi,

gibt es eine Möglichkeit, den Üerbgang zu Ruhezustand von Windows abzufangen und ein Programmd arauf reagieren zu lassen?

Danke,

Jens

[Union]

Delphi-Quellcode:

procedure WMPowerBroadcast(var Msg : TWMPower) ; message WM_POWERBROADCAST;
.
.
.
//------------------------------------------------------------------------
procedure TfrmMain.WMPowerBroadcast(var Msg: TWMPower);
//------------------------------------------------------------------------
// Suspend ablehnen
//------------------------------------------------------------------------
begin
   Msg.Result :=  BROADCAST_QUERY_DENY;
end;