Gefunden auf 
www.delphi-fundgrube.de
Zitat:
Wie kann man den Monitor in den StandBy-Modus schalten?
Weiß jemand, wie ich in Delphi 3 unter Win98 meinen Monitor in den Standby Modus bringen kann?
Ja, das geht folgendermassen:
Delphi-Quellcode:
//abschalten:
SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 0);
//anschalten:
SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, -1);
{Beat Schwarzentrub}
Achtung: Wenn du den Monitor ausschaltest, mußt du ihn auch selber wieder anschalten!
Das geht prima bei mir! Kombinier das aber vielleicht
nicht mit nem Timer.
Das wär halt Ausschalten. Wenn du den Screen nur schwarz machen willst mach das doch so:
Delphi-Quellcode:
begin
WindowState := WSMaximized;
Form1.Font.Color := ClBlack;
end;
Hm
Da fällt mir grad auf das geht ja gar nicht. Aber ich denke du weisst was ich meine. Alles unsichtbar und Hintergrund der Form Schwarz machen.
MfG Florian
