TWMPower ist für WM_POWER, nicht für WM_POWERBROADCAST - nimm lieber einfach TMessage.
Laut
PSDK kann wParam die folgenden Werte haben:
Zitat von
PSDK:
Code:
[b]Event Meaning[/b]
PBT_APMBATTERYLOW Battery power is low.
PBT_APMOEMEVENT OEM-defined event occurred.
PBT_APMPOWERSTATUSCHANGE Power status has changed.
PBT_APMQUERYSUSPEND Request for permission to suspend.
PBT_APMQUERYSUSPENDFAILED Suspension request denied.
PBT_APMRESUMEAUTOMATIC Operation resuming automatically after event.
PBT_APMRESUMECRITICAL Operation resuming after critical suspension.
PBT_APMRESUMESUSPEND Operation resuming after suspension.
PBT_APMSUSPEND System is suspending operation.
Prüfe mal auf diese Werte.
Außerdem solltest du Msg.Result auf TRUE setzen, um das Suspend zu erlauben.