找回密码
 加入
搜索
查看: 4808|回复: 7

[系统综合] 如何实现关闭显示器

  [复制链接]
发表于 2010-4-15 10:44:47 | 显示全部楼层 |阅读模式
如何实现关闭显示器


高手们!!!
发表于 2010-4-15 10:45:31 | 显示全部楼层
拔电源
发表于 2010-4-15 11:27:57 | 显示全部楼层
按開關! POWER ... XD
发表于 2010-4-15 12:24:32 | 显示全部楼层
发表于 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
发表于 2010-4-16 15:22:56 | 显示全部楼层
谢谢分享!!
发表于 2010-4-17 11:09:12 | 显示全部楼层
呵呵,温习一遍,至少三种方法哦
发表于 2010-4-22 10:00:52 | 显示全部楼层
拔电源最实际
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-5-20 18:21 , Processed in 0.096932 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表