Hallo,
ich habe einen Timer programmiert, der den PC aus und wieder einschaltet.
Beim Ausschalten bietet es die Möglichkeit zum Standby oder Ruhezustand, und von da wieder eingeschaltet zu werden.
Jetzt habe ich das Problem, das nach dem Starten aus dem Standby der Bildschirm nicht wieder einschaltet. In der Forumsuche habe ich das gefunden:
Delphi-Quellcode:
procedure WMPowerBroadcast(var Msg: TMessage); message WM_POWERBROADCAST;
.
.
.
procedure TForm1.WMPowerBroadcast(var msg: TMessage);
begin
if Msg.WParam in [PBT_APMRESUMEAUTOMATIC, PBT_APMRESUMESUSPEND] then
begin
Form1.TrayIcon1.ShowBalloonHint('PCTimer','Computer wurde durch den PCTimer gestartet.'+#13+
'Hier klicken um die Eigenschaften aufzurufen.',bitInfo,10);
end;
SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, -1);//<<-- Das hier!
end;
Das Aufpoppen des BalloonHint höre ich in den Lautsprechern, doch der Bildschirm bleibt aus.
Hat jemand eine Idee warum das so ist, und wie man das ändern kann?
Im Voraus mal Danke.