|
求大侠把这个录制的前台脚本怎么改成易语言里后台运行
//查找窗口类名(0)或者标题("小助手 1.4.3"),返回找到的句柄Hwnd
Hwnd = Plugin.Window.Find(0, "小助手 1.4.3")
TracePrint Hwnd
还原窗口
Call Plugin.Window.Restore(Hwnd)
ckkhq = Plugin.Window.GetClientRect(Hwnd)
TracePrint ckkhq
fenge = split(ckkhq, "|")
x1 = fenge(0)
y1 = fenge(1)
x2 = x1+519
y2 = y1 + 30
x3 = x1+748
y3 = y1 + 971
x4 = x1+668
y4 = y1 + 944
x5 = x1+1181
y5 = y1 + 141
x6 = x1+878
y6 = y1 + 247
x7 = x1+876
y7 = y1 + 560
x8 = x1+951
y8 = y1 + 597
x9 = x1+1033
y9 = y1 + 560
For 1000
Delay 2000
'==========以下点“快手”==========
MoveTo x2,y2
Delay 1000
LeftClick 1
'==========以上是按键精灵录制的内容==========
MoveTo x3, y3
Delay 2050
LeftDown 1
Delay 7
LeftClick 1
MoveTo x4, y4
Delay 1172
KeyDown "Alt", 1
Delay 5
KeyDown "E", 1
Delay 1000
KeyUp "E", 1
Delay 5
KeyUp "Alt", 1
Delay 2000
'==========以下点“解析”==========
MoveTo x5, y5
Delay 8000
LeftClick 1
Delay 1000
'==========以下点“解析失败”==========
MoveTo 957,588
Delay 1000
LeftClick 1
Delay 8000
'==========以下点“确认修改”==========
MoveTo x6, y6
Delay 1000
LeftClick 1
Delay 1000
//==========以下点“确定关联”==========
MoveTo 933,567
Delay 1000
LeftClick 1
Delay 10
'==========以下点“关联失败”==========
MoveTo 1035,563
Delay 1000
LeftClick 1
Delay 25000
Next
|
|