按键精灵 如何打开QQ聊天窗口
1个回答
展开全部
方法:找到句柄位置,双击。代码:
sRect = Plugin.Window.GetClientRect(Hwnd)
Dim MyArray
MyArray = Split(sRect, "|")
L = Clng(MyArray(0)) : T = Clng(MyArray(1)) 'L和T分别是句柄左上角的x,y坐标
Call Plugin.Bkgnd.LeftClick(Hwnd, 50, 50)
Call Plugin.Bkgnd.LeftClick(Hwnd, 50, 50)
后台不行的话,可以改为前台操作,将最后两句改为:
MoveTo L+50, T+50
LeftDoubleClick 1
sRect = Plugin.Window.GetClientRect(Hwnd)
Dim MyArray
MyArray = Split(sRect, "|")
L = Clng(MyArray(0)) : T = Clng(MyArray(1)) 'L和T分别是句柄左上角的x,y坐标
Call Plugin.Bkgnd.LeftClick(Hwnd, 50, 50)
Call Plugin.Bkgnd.LeftClick(Hwnd, 50, 50)
后台不行的话,可以改为前台操作,将最后两句改为:
MoveTo L+50, T+50
LeftDoubleClick 1
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询