Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Software-Projekte der Mitglieder (https://www.delphipraxis.net/26-software-projekte-der-mitglieder/)
-   -   ScreenOff - Monitor mit zwei Klicks im Standby (https://www.delphipraxis.net/53511-screenoff-monitor-mit-zwei-klicks-im-standby.html)

Pr0g 18. Sep 2005 01:07


ScreenOff - Monitor mit zwei Klicks im Standby
 
Hallo,

da ich meinen Rechner in letzter Zeit öfters mal bei längerer Abwesenheit anlasse und eventuell auch Nachts, habe ich ein kleines Tool geschrieben, welches den Mointor in den StandBy Modus schaltet. Nichts besonderes, ich weiß - aber nützlich wenn man es brauchen kann. Das Programm einfach starten, dann wird der Monitor direkt in den StandBy Modus gefahren und das Programm beendet sich. Ums Wiedereinschalten kümmert sich Windows automatisch. Nach dem Programmstart wartet das Tool noch kurz 100 Millisekunden, da es sonst passieren könnte, dass Windows sofort zurückschaltet. Ich habe es unter WinXP getestet, könnt ja mal sagen wie es mit anderen Systemen läuft...




MfG Pr0g

MasterC 18. Sep 2005 01:11

Re: ScreenOff - Monitor mit zwei Klicks im Standby
 
Hi,

hört sich interessant an, funktioniert aber leider nicht bei mir. Beim Start des Programmes passiert gar nichts. :(

Habe einen TFT Monitor (BenQ FP71E+), liegt das vielleicht daran?

MfG

gsh 18. Sep 2005 01:14

Re: ScreenOff - Monitor mit zwei Klicks im Standby
 
Also ich weiss nicht hab einen WinXp SP2 Prof. Rechner mit einer Radeon 9600 SE aber des Programm tut absolut gar nichts :roll: .

Pr0g 18. Sep 2005 01:22

Re: ScreenOff - Monitor mit zwei Klicks im Standby
 
Wie es mit nem TFT aussieht weiß ich net, könnte ich heute Mittag mal testen. Aber bei meinem Siemens-Nixdorf Monitor und der Radeon 9800 (Pro) klappts einwandfrei :roll:

turboPASCAL 18. Sep 2005 01:29

Re: ScreenOff - Monitor mit zwei Klicks im Standby
 
Delphi-Quellcode:
SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 1);
Standby für den Monitor.

Zum einschalten langsam die Maus 1,4 cm nach links bewegen...

Pr0g 18. Sep 2005 01:33

Re: ScreenOff - Monitor mit zwei Klicks im Standby
 
Ich nutze den gleichen Code, nur dass ich nix 1.4 cm zum Einschalten bewegen muss :lol:
Delphi-Quellcode:
program ScreenOff;

uses
  Windows,
  Messages;

{$R *.res}

begin
  Sleep(100);
  SendMessage(GetDesktopWindow() , WM_SYSCOMMAND, SC_MONITORPOWER, 1);
end.

MasterC 18. Sep 2005 01:36

Re: ScreenOff - Monitor mit zwei Klicks im Standby
 
GetDesktopWindow()?

Also mit

Delphi-Quellcode:
SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 1);
funktioniert es wunderbar bei mir.

turboPASCAL 18. Sep 2005 01:43

Re: ScreenOff - Monitor mit zwei Klicks im Standby
 
Zitat:

Zitat von Pr0g
Ich nutze den gleichen Code, nur dass ich nix 1.4 cm zum Einschalten bewegen muss :lol:
Code:
[b][...][/b]
[b]begin[/b]
  Sleep(100);
  SendMessage([color=#ff0000]GetDesktopWindow()[/color] , WM_SYSCOMMAND, SC_MONITORPOWER, 1);
[b]end[/b].

:gruebel: Das sollte es auch tun wenn GetDesktopWindow etwas vernünftiges zurück gibt.

faux 18. Sep 2005 07:14

Re: ScreenOff - Monitor mit zwei Klicks im Standby
 
Zu allem Überfluss möchte ich sagen, dass es bei meinem Fujitsu Siemens S7 TFT ebenfalls nicht geht...

Faux

ManuMF 18. Sep 2005 08:56

Re: ScreenOff - Monitor mit zwei Klicks im Standby
 
Nvidia Geforce 4 MX 440 / Fujitsu-Siemens C-17-5 (TFT) / WinXP und funktioniert.


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:14 Uhr.
Seite 1 von 3  1 23      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz