How To Turn On / Off-Monitor mit Delphi

Verstehen WM_SYSCOMMAND Nachricht. Bevor ich die Schritte, die zur Überwachung der Leistung heruntergefahren werde ich ein wenig über die WM_SYSCOMMAND Nachricht. WM_SYSCOMMAND ist an das Fenster zu informieren, dass der Benutzer tut ein System-Kommando-Ebene. Ausschalten des Monitors ist einer der System-Befehle, die WM_SYSCOMMAND generiert.

Schalten Sie den Monitor. Es gibt drei Staaten überwachen Leistung: Ein, Aus-und Stand-By (Low-Power-Modus). An die Macht der Monitor auf, senden Sie WM_SYSCOMMAND mit wParam auf SC_MONITORPOWER und lParam auf $ FFFFFFFF (oder -1). Der folgende Code ist ein Beispiel dafür, wie es geht.

/ / Macht auf dem Monitor
SendMessage (Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, $ FFFFFFFF);

Schalten Sie den Monitor. Zum Ausschalten des Monitors, senden Sie WM_SYSCOMMAND mit wParam auf SC_MONITORPOWER und lParam auf 2 gesetzt.

/ / Ausschalten Monitor
SendMessage (Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 2);

Power Monitor auf Stand-by-Modus. Und zuletzt, um den Monitor in Low-Power-Modus (Stand-by), senden Sie WM_SYSCOMMAND mit wParam auf SC_MONITORPOWER und lParam auf 1 gesetzt.

/ / Ausschalten Monitor
SendMessage (Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 1);

Enthalten alle gesetzlich notwendigen Einheiten in Ihrem Klausel verwendet. Um es funktioniert, müssen Sie in Ihrem erforderlichen Einheiten verwendet Klausel. Funktion SendMessage () wird in windows.pas Einheit und WM_SYSCOMMAND wird in messages.pas Unit, so müssen Sie sicherstellen, es ist in Klausel verwendet.