Vision Saver

Автор	Съобщение
stoqncho Съб, 14.04.12, 17:26	http://www.autoitscript.com/autoit3/docs/libfunctions/_SendMessage.htm Example #include <SendMessage.au3>   _Main()   Func _Main() Local Const $Off = 2, $On = -1   Opt("WinTitleMatchMode", 4) Local $hwnd = WinGetHandle('classname=Progman') _ToggleMonitor($hwnd, $Off) Sleep(3000) _ToggleMonitor($hwnd, $On) EndFunc ;==>_Main   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 ;==>_ToggleMonitor
	Отговор  За печат
programings Съб, 14.04.12, 20:06	Е, айде сега!
	Отговор  За печат

Коментар