Bildschirm mittels Funktion ausschalten

[T.E.]

Hallo!!

Ich möchte gerne ein Programm schreiben, das nach einer bestimmten verstrichenen Zeit die Bildschrim/die Bildschrirmbeleuchtung ausschaltet... nur wüsst ich gerene wie das geht bzw. ob das geht...

ich weiß nämlich nur das bei Notebooks i.d.R. immer eine Tastenkombinatiion vorhanden ist, um den Bildschirm auszuschalten...

Weiß jemand wie ich den bildschirm auschhalten kann?

[Tommy1988]

Bildschirm aus:

Delphi-Quellcode:

SendMessage(Application.Handle, 
WM_SYSCOMMAND, SC_MONITORPOWER, 1);

Bildschirm an:

Delphi-Quellcode:

SendMessage(Application.Handle, 
WM_SYSCOMMAND, SC_MONITORPOWER, 0);

Jetzt musst du das nurnoch in deine Routine packen

[T.E.]

hat ich leider schon versucht, nur leider ohne ergebnis...

[Tommy1988]

Zitat von T.E.:

hat ich leider schon versucht, nur leider ohne ergebnis...

Zeig mal deinen Code her.

Der oben von mir gepostete Code "MUSS" (Edit) funktionieren das geht garnicht anders..

Edit: Hät ich mal Google benutzt

[Bernhard Geyer]

Wenn du nach SC_MONITORPOWER googelst bekommst du auch Einträge das dies Aufgrund von Fehlern in Grafikkartentreibern nicht funktioniert.

[hathor]

Info:

const
MONITOR_ON = -1;
MONITOR_OFF = 2;
MONITOR_STANDBY = 1;


SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_STATE);

More specifically,
Turn the monitor ON, using:

SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_ON);


Turn the monitor OFF, using:

SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_OFF);


Put the monitor to STAND BY, using:

SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_STANDBY);