为什么用 ControlSend 模拟击键不起作用?

问题描述 投票:0回答:1

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

Au3Info

标题:Р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
keypress autoit
1个回答
0
投票

您可以首先使用 WinGetHandle 来接收 Window 的句柄,然后在 ControlSend 函数中使用该句柄,这应该可以工作。它看起来像下面这样:

$handle = WinGetHandle("[TITLE:PokeMMO; CLASS:LWJGL]")
ControlSend($handle, Default, $handle, "{Down}")

首先尝试显示句柄的内容以确认您正在收到一个工作句柄。就像

ConsoleWrite($handle)
MsgBox(1, "Handle", WinGetTitle($handle))

去吧,尝试一下;-)
祝你好运!

最新问题
© www.soinside.com 2019 - 2024. All rights reserved.