DimEnv key
Hwnd = split(Plugin.Window.Search("GAMEAPP"), "|")
For i = 0 To UBound(Hwnd) - 1
Hwnda=Hwnd(i)
BeginThread an
Delay 500
Next
Do
key = WaitKey
Delay 100
Loop
Sub an
Do
If key <> "" Then
Call Plugin.Window.SendKeyPress(Hwnda, key)
key = ""
End If
Delay 100
Loop
End Sub
你会用大漠吗?
用后台,多线程,