求按键精灵后台两个点之间鼠标点击脚本

后台的
2024年11月17日 16:36
有1个网友回答
网友(1):

x1=100:y1=100
x2=200:y2=200
//后台循环左键点击
点击 = WaitClick()//等待点击要抓取的窗口
Delay 10//等待时间10毫秒
//得到鼠标指向的窗口句柄
Hwnd = Plugin.Window.MousePoint()

//下面这句是得到窗口句柄的客户区大小
sRect = Plugin.Window.GetClientRect(Hwnd)
//MsgBox "得到窗口句柄的客户区大小为:"& sRect
//下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串
//dim MyArray
MyArray = Split(sRect, "|")
//下面这句将字符串转换成数值
L = Clng(MyArray(0)): T = Clng(MyArray(1))
R = Clng(MyArray(2)): B = Clng(MyArray(3))
//Msgbox "窗口客户端后台坐标系原点的前台坐标x0" & L & ",窗口客户端后台坐标系原点的前台坐标y0" & T & ", 窗口客户端后台坐标x的最大值(宽)"& R & ",窗口客户端后台坐标y的最大值(高)" & B
//do
//Delay 1000
//向后台窗口句柄(变量:Hwnd)的客户区域(坐标:0, 0)处发送一个鼠标左键单击,自己改后台坐标.
//Call Plugin.Bkgnd.LeftClick(Hwnd, 0, 0)//后台坐标系

//Call Plugin.Bkgnd.LeftClick(Hwnd, x, y)//用变量
//Call Plugin.Bkgnd.LeftClick(Hwnd, x+l, y+t)//(变量为前台坐标系)
//Delay 500
for x=x1 to x2
//y=直线方程求出

Call Plugin.Bkgnd.LeftClick(Hwnd, x, y)//用变量
delay 5
next

//Loop