首页 > 代码库 > 一个按键精灵后台发送消息的脚本
一个按键精灵后台发送消息的脚本
以前,我也用过按键精灵写过一些脚本,那时候经常用这个来挂机FB什么的。
那天,某网友问起,于是就回答了下
无非就是,抓句柄,然后相对定位坐标或者发送消息到固定窗体
代码如下:
1 //////////////////////////抓窗口句柄////////////////////////////////////////// 2 3 Dim Hwnd 4 5 Hwnd = Plugin.Window.MousePoint() 6 7 sWindow = Plugin.Window.IsWindow(Hwnd) 8 9 If sWindow = -1 Then 10 11 Hwnd = Plugin.Window.Foreground()12 13 End If14 15 sRect = Plugin.Window.GetClientRect(Hwnd)16 17 18 XYArray = Split(sRect, "|")19 20 dx = Clng(XYArray(0))21 22 dy = Clng(XYArray(1)) 23 24 //////////////////////////窗口句柄结束//////////////////////////////////////////////25 //////////////////////////////上面不理解,可无视///////////////////////////26 /////////////////////////////自己参照下面的写法/////////////////////////////////////27 Call Plugin.Bkgnd.MoveTo(Hwnd, 830-dx, 247-dy) //移动鼠标到指定位置28 Call Plugin.Bkgnd.RightClick(Hwnd, 830-dx, 247-dy)//右键29 Call Plugin.Bkgnd.KeyDown(Hwnd, 112) //按下F1,其他键值自己百度30 Delay 20031 Call Plugin.Bkgnd.KeyUp(Hwnd, 112) //放开F132 Delay 43000
一个按键精灵后台发送消息的脚本
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。