//声明变量
GetCursorPos x, y
//得到当前鼠标的坐标位置 并保存到变量x,y中
Color=GetPixelColor(x,y)
//得到指定坐标位置的颜色 并保存到变量color中
MessageBox("坐标为:"&x&","&y&" 颜色为:"&color)
//d出窗口 输出坐标和颜色的值现获取左上角坐标
dim
hwnd
hwnd
=
pluginwindowmousepoint()
//下面这句是得到窗口句柄的客户区大小
srect
=
pluginwindowgetclientrect(hwnd)
//下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串
dim
myarray
myarray
=
split(srect,
"|")
//下面这句将字符串转换成数值
l
=
clng(myarray(0)):
t
=
clng(myarray(1))
r
=
clng(myarray(2)):
b
=
clng(myarray(3))
plugin
color
=
bkgndcolorgetpixelcolor(hwnd,
l+屏幕到点之间的x距离差,
t+y差)
反正你用后台也能实现Dim a,b
For a = 169 To 719
For b = 0 To 1100
Tap a, b
Next
Next
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)