Добрый день. Все бьюсь с функцией ControlClick и что-то, ничего у меня не получается. Я так понимаю она должна работать по аналогии с функцией ControlSend, ан нет. ControlSend работает отлично. Ниже мои попытки)
ControlSend
ControlClick
Буду благодарен за любую помощь. Спасибо за внимание.
ControlSend
Код:
Example()
Func Example()
; Run Notepad
; Wait 10 seconds for the Notepad window to appear.
Local $hWnd = WinWaitActive("Epoch of Shadows")
; Retrieve the handle of the edit control in Notepad. The handle returned by WinWait is used for the "title" parameter of ControlGetHandle.
Local $hControl = ControlGetHandle($hWnd, "", "")
; Display the handle of the edit control.
$i = 0
While $i<5
ControlSend ($hControl, "", 0, "tare dekavo")
ControlSend ($hControl, "", 0, "{ENTER}")
Sleep(300)
$i = $i+1
WEnd
; Close the Notepad window using the handle returned by WinWait.
EndFunc ;==>Example
ControlClick
Код:
#RequireAdmin
Opt("MouseCoordMode",0)
; Script Start - Add your code below here
Global $hWnd = WinWait("Epoch of Shadows")
$Handle = getHandle($hWnd)
HotKeySet("!{F1}", "fish")
While 1
Sleep(100)
WEnd
Func fish()
ControlClick($Handle, "", 0,"right",1,490,260)
ControlClick($Handle, "", 0,"left",1,55,190)
EndFunc
Func getHandle($nD)
$hWnd = ControlGetHandle($nD, "", "")
Return $hWnd
EndFunc