Bilschirmschoner ausschalten, bzw. Bildschirm einschalten

[Mike Buch]

Hallo Leute,

Ich möchte in einem Proramm in einem Ereignis den Bildschirmschoner
(wenn er gerade läuft) ausschalten, bzw. den Monitor mit einem WakeUp
wieder aus dem Standby holen.

Kann mir jemand einen Tip geben ??

[Uli Becker]

Hallo,

<pre>
var ExistsScreenSaver : word;
{Es wird festgestellt, ob ein Screensaver aktiviert ist}
SystemParametersInfo(SPI_GETSCREENSAVEACTIVE,0,@Ex istsScreensaver,0);
{Falls ja, dann wird er deaktiviert}
if ExistsScreensaver = 1 then
SystemParametersInfo(SPI_SETSCREENSAVEACTIVE,0,nil ,0);

{Falls ein Screensaver eingestellt war, wird diese Einstellung hier wiederhergestellt}
if ExistsScreensaver = 1 then
SystemParametersInfo(SPI_SETSCREENSAVEACTIVE,1,nil ,0);
</pre>

Viel Erfolg..

Super, vielen Dank für die Info,
werde ich morgen gleich testen.

Wie ich den Bildschirm "aufwecke" weißt du nicht zufällig

[Uli Becker]

Hallo Mike,

es gibt sicher eine elegantere Lösung, aber diese funktioniert bei mir:

Mouse_Event(Mouseeventf_move,100,100,0,0);

Viel Erfolg..

[Uli Becker]

Hallo Mike,

Nachtrag: Sorry, ich habe deine Frage nicht richtig gelesen: Mouse_Event verwende ich nur, um den Screensaver zu unterbrechen.

Gruß Ul

Hallo Uli,

Der Mouse_Event funktioniert aber super, DANKE !