Habe es gerade noch einmal getestet. Resume-Suspend wird ins Memo geschrieben aber nicht Suspend. Resume wird aber auch geschrieben, wenn man gerade in den Energiesparmodus geht.
Delphi-Quellcode:
case Msg.WParam of
PBT_APMSUSPEND:
Memo1.Lines.Add('PBT_APMSUSPEND');
PBT_APMRESUMESUSPEND:
Memo1.Lines.Add('PBT_APMRESUMESUSPEND');
end;