Supportnet Computer
Planet of Tech

Supportnet / Forum / WindowsXP

Energiespar-Modus des Monitors per Doppelklick/Hotkey





Frage

Moin zusammen! Steht ja eigentlich alles in der Überschrift! Wie kann ich die XP eigene Energiesparfunktion des Monitors per Verknüpfung und damit auch Hotkey aktivieren? mfG Renfield™

Antwort 1 von __0d3n__0lg3r

Kennst du dich mit Visual Basic aus? Wenn ja dann könnte dir das helfen:

'Dieser Source stammt von http://www.activevb.de
'und kann frei verwendet werden. Für eventuelle Schäden
'wird nicht gehaftet.

'Um Fehler oder Fragen zu klären, nutzen Sie bitte unser Forum.
'Ansonsten viel Spaß und Erfolg mit diesem Source!

'------------- Anfang Projektdatei Project1.vbp -------------
'--------- Anfang Formular "Form1" alias Form1.frm  ---------
'Dieser Source stammt von http://www.activevb.de
'und kann frei verwendet werden. Für eventuelle Schäden
'wird nicht gehaftet.

'Um Fehler oder Fragen zu klären, nutzen Sie bitte unser Forum.
'Ansonsten viel Spaß und Erfolg mit diesem Source !

Option Explicit

Private Declare Function SendMessage Lib "user32" Alias _
        "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As _
        Long, ByVal wParam As Long, lParam As Any) As Long

Const WM_SYSCOMMAND = &H112
Const SC_MONITORPOWER = &HF170

Private Sub Command1_Click()
  Dim X%
  
    X = MsgBox("Monitor 10 Sec ausschalten ?", vbOKCancel)
    If X = 1 Then
      Timer1.Interval = 10000
      Timer1.Enabled = True
      SendMessage Me.hwnd, WM_SYSCOMMAND, SC_MONITORPOWER, ByVal 2&
    End If
End Sub

 
Private Sub Form_Load()
  Timer1.Enabled = False
End Sub

Private Sub Timer1_Timer()
  Timer1.Enabled = False
  SendMessage Me.hwnd, WM_SYSCOMMAND, SC_MONITORPOWER, ByVal -1&
End Sub
'---------- Ende Formular "Form1" alias Form1.frm  ----------
'-------------- Ende Projektdatei Project1.vbp --------------


Mfg }{0d3n}{0lg3r

Antwort 2 von __0d3n__0lg3r

Hier is noch mal der Link zu der Seite, wo ich es her habe:

Klick

Mfg }{0d3n}{0lg3r

Antwort 3 von Renfield

Danke, aber hilft mir leider nicht wirklich weiter, da das Script unter XP wohl nur mit VB4 läuft!

Weiter Vorschläge?

mfG Renfield™

Antwort 4 von Pumuckel

http://homepages.fh-giessen.de/~hg8496/Programs/Windows/Sofort-Scho...

Ein kleines nützliches Tool, mit dem man entweder zw. Screensaver / Stand by oder power off wählen kann.
Es nistet sich in der Taskleiste ein, eine Shortcutfunktion ist nicht integriert, aber die kann man evtl. mit Windows basteln :-)

Funzt auch unter XP

Antwort 5 von Renfield

Prima - funzt - Danke!

mfG Renfield™