论坛 › 『 提问交流 』 › 如何实现关闭显示器

rikthhpgf2005 发表于 2010-4-15 10:44:47

如何实现关闭显示器

如何实现关闭显示器


高手们!!!:face (36):

nmgwddj 发表于 2010-4-15 10:45:31

拔电源:face (22):

We! 发表于 2010-4-15 11:27:57

按開關! POWER ... XD

afan 发表于 2010-4-15 12:24:32

搜索啊
http://www.autoitx.com/forum.php?mod=viewthread&tid=12683

zhoujinshi520 发表于 2010-4-16 14:17:52

#include <SendMessage.au3>

_Main()

Func _Main()
    Local Const $Off = 2, $On = -1

    Opt("WinTitleMatchMode", 4)
    $hwnd = WinGetHandle('classname=Progman')
    _ToggleMonitor($hWnd, $Off)
    Sleep ( 3000 )
    _ToggleMonitor($hWnd, $On)
EndFunc

Func _ToggleMonitor($hwnd, $OnOff)
    Local Const $WM_SYSCOMMAND = 274
    Local Const $SC_MONITORPOWER = 61808
    _SendMessage($hWnd, $WM_SYSCOMMAND, $SC_MONITORPOWER, $OnOff)
    If @error Then
      MsgBox(0,"_ToggleMonitor", "_SendMessage Error: " & @error)
      Exit
    EndIf
EndFunc

masterpcc 发表于 2010-4-16 15:22:56

谢谢分享！！

menfan 发表于 2010-4-17 11:09:12

呵呵，温习一遍，至少三种方法哦

qq342252004 发表于 2010-4-22 10:00:52

拔电源最实际

查看完整版本: 如何实现关闭显示器