[Fun/Tool] Monitor in den Standby + Funny Button

[faux]

1. geht bei mir nicht, ich hab StyleXP.

[turboPASCAL]

Zitat von Kedariodakon:

Zitat von NicoDE:

Zitat von Kedariodakon:

Hmm bei mir kommt nichtmal eine Form mit Buttons

Versuch's mit [Alt+Leertaste] -> Verschieben.

Danke, ging =)
Irgendwie war das Fenster ganz rechts oben auserhalb des Monitors, oder besser ist es immer, wenn ich es starte...

BTW: Nur Button Nr. 2 läuft...

Bye

Habe mal eine neue Version hochgeladen, bitte teile mir mit ob der Fehler immernoch da ist.

Hast du eine andere Taskbar oder 2 Monitore ?

[NicoDE]

Damit der erste Button unter Windows XP (sp2) auch funktioniert, müssteSendMessage(GetDesktopWindow(), WM_SYSCOMMAND, SC_MONITORPOWER, 1); in

Delphi-Quellcode:

SendMessage(FindWindow('Progman', 'Program Manager'),
  WM_SYSCOMMAND, SC_MONITORPOWER, 1);

geändert werden.

Grund: das '#32769'-Desktop-Fenster (csrss), reagiert nicht (mehr) auf die Nachricht - das 'Progman'-Desktop-Fenster (shell-explorer) reagiert allerdings wie erwartet...

[Kedariodakon]

Knopf1: geht nicht (Das Windowshandle vom Desktop ist: 65556)
Knopf2: geht
Knopf3: geht nicht

Zitat von turboPASCAL:

Habe mal eine neue Version hochgeladen, bitte teile mir mit ob der Fehler immernoch da ist.
Hast du eine andere Taskbar oder 2 Monitore ?

Normal WindowsXP SP2, ein Monitor (1600 x 1200) Taskleiste Links...

Bye

[turboPASCAL]

@Sharky Nein, bekomme ich nicht ? Noch nicht !

Zitat von Kedariodakon:

Knopf1: geht nicht (Das Windowshandle vom Desktop ist: 65556)
Knopf2: geht
Knopf3: geht nicht

Zitat von turboPASCAL:

Habe mal eine neue Version hochgeladen, bitte teile mir mit ob der Fehler immernoch da ist.
Hast du eine andere Taskbar oder 2 Monitore ?

Normal WindowsXP SP2, ein Monitor (1600 x 1200) Taskleiste Links...

Bye

Ja. Sorry ich hatte eine neue Version hochgeladen bei der noch was ausgeklammert war.

*** Now is Open Source. Thx @All. ***

[MiniKeks]

Was macht denn der Knopf, den man nicht benutzen darf?

Schaltet das mein monitor ganz schnell ein und wieder aus?

[turboPASCAL]

Sag ich nich.

[faux]

Frage:

Wieso muss man vor den Befehl immer ein Sleep(1000) machen? Bei mir gehts auch ohne...

[turboPASCAL]

Code:

[b][...][/b]
        [color=darkblue]// Warten um unabsichtliche Mausbewegungen abzufangen[/color]
        Sleep(1000);
        [color=darkblue]// Standby aufrufen[/color]
        SendMessage(FindWindow('Progman', 'Program Manager'),
          WM_SYSCOMMAND, SC_MONITORPOWER, 1);
[b][...][/b]

Zitat von faux:

Bei mir gehts auch ohne...

Bei mir auch, aber ich darf die Maus beim loslassen nicht mehr bewegen (leichtes verwackeln) sonst ist es mit dem Standby pfutsch. Ist halt nur zur Sicherheit.