Question

按键精灵！获取窗口位置然后换算,在调用按键前台的鼠标点击!

按键精灵！怎么获取窗口位置然后换算,在调用按键前台的鼠标点击!求源代码！！

Answer 1

hwnd= Plugin.Window.MousePoint()

sRect = Plugin.Window.GetWindowRect(Hwnd)

Dim MyArray

MyArray=Split(sRect,"|")

x=CLng(MyArray(0))

y = CLng(MyArray(1))

这样得到的x,y就是当前窗口左上角的前台坐标，如果前台鼠标位置ux,uy需要换算成屏幕上的后台鼠标bx.by 的话

bx = ux -x
by = uy -y

追问

但我不想知道当前窗口 我想自定义哪的窗口句柄！

追答

不太明白你的意思
窗口句柄的参数名称可以自定义， 但句柄数值是系统自动分配的 只能获取 不能人工赋值。。

追问

对！先找这个窗口！再获取句柄！不管这个窗口移动到哪里！都在这个窗口上点指定坐标点击去！（前台鼠标移动）

追答

hwnd= Plugin.Window.MousePoint()

hwnd 这就是你需要的窗口句柄

追问

hwnd= Plugin.Window.MousePoint()

您的意思是，将这句改成这个嘛 ！
hwnd="要找的句柄"
这句提示“类型不匹配Window.GetWindowRect”
{x=CLng(MyArray(0))
y = CLng(MyArray(1))}

这两句提示“下标越界”

追答

hwnd= Plugin.Window.MousePoint()
traceprint "窗口句柄为"&Hwnd

sRect = Plugin.Window.GetWindowRect(Hwnd)
traceprint "窗口左上点和右下点坐标为"&sRect

Dim MyArray
MyArray=Split(sRect,"|")

x=CLng(MyArray(0))

y = CLng(MyArray(1))

traceprint "窗口左上点坐标为"&x&","&y

把上面的复制到空白脚本里 然后点调试 再运行
还看不懂就没办法了 ：）

Answer 2

按键精灵有很多版本，你确定你下对了？

追问

9.6版本！关版本什么问题！