ControlSend()
模拟击键不起作用:
While 1
ControlSend("PokeMMO", "", "", "{DOWN}")
Sleep(900)
ControlSend("PokeMMO", "", "", "{DOWN}")
Sleep(900)
ControlSend("PokeMMO", "", "", "{DOWN}")
Sleep(900)
ControlSend("PokeMMO", "", "", "a")
Sleep(Random(750, 2000, 1))
ControlSend("PokeMMO", "", "", "a")
Sleep(Random(750, 2000, 1))
ControlSend("PokeMMO", "", "", "a")
Sleep(Random(750, 2000, 1))
ControlSend("PokeMMO", "", "", "a")
Sleep(3000)
WEnd
标题:РokеММO,
类别:LWJGL
Global $sProcess = "javaw.exe" ;PokeMMO Process
ControlSend(_Process2Win($sProcess), "", "", "{DOWN}")
Func _Process2Win($pid)
If IsString($pid) Then $pid = ProcessExists($pid)
If $pid = 0 Then Return -1
$list = WinList()
For $i = 1 To $list[0][0]
If $list[$i][0] <> "" And BitAND(WinGetState($list[$i][1]), 2) Then
$wpid = WinGetProcess($list[$i][0])
If $wpid = $pid Then Return $list[$i][0]
EndIf
Next
Return -1
EndFunc ;==>_Process2Win
您可以首先使用 WinGetHandle 来接收 Window 的句柄,然后在 ControlSend 函数中使用该句柄,这应该可以工作。它看起来像下面这样:
$handle = WinGetHandle("[TITLE:PokeMMO; CLASS:LWJGL]")
ControlSend($handle, Default, $handle, "{Down}")
首先尝试显示句柄的内容以确认您正在收到一个工作句柄。就像
ConsoleWrite($handle)
或MsgBox(1, "Handle", WinGetTitle($handle))
去吧,尝试一下;-)
祝你好运!