精易模块中的鼠标_带轨迹移动,增加句柄模式,开源

cuijialu

  

子程序名	返回值类型	公开	备 注
鼠标_带轨迹移动
参数名	类 型	参考	可空	数组	备 注
参_起始x	整数型				空为鼠标当前坐标
参_起始y	整数型
参_终点x	整数型
参_终点y	整数型
参_移动速度	整数型
窗口句柄	整数型

变量名	类 型	静态	数组	备 注
局_判断值	逻辑型
局_X
局_Y
临时坐标	精易_坐标

如果真 (窗口句柄 ≠ 0)
ClientToScreen (窗口句柄, 临时坐标)
参_终点x ＝ 临时坐标.横 ＋ 参_终点x
参_终点y ＝ 临时坐标.纵 ＋ 参_终点y

如果真 (是否为空 (参_起始x))
参_起始x ＝ 取鼠标水平位置 ()
如果真 (是否为空 (参_起始y))
参_起始y ＝ 取鼠标垂直位置 ()
如果真 (是否为空 (参_移动速度))
参_移动速度 ＝ 1
SetCursorPos (参_起始x, 参_起始y)
判断循环首 (局_判断值 ＝ 假)
参_起始x ＝ 取鼠标水平位置 ()
参_起始y ＝ 取鼠标垂直位置 ()
判断 (参_终点x ＞ 参_起始x)
局_X ＝ 1
判断 (参_终点x ＜ 参_起始x)
局_X ＝ -1
判断 (参_终点x ＝ 参_起始x)
局_X ＝ 0



判断 (参_终点y ＞ 参_起始y)
局_Y ＝ 1
判断 (参_终点y ＜ 参_起始y)
局_Y ＝ -1
判断 (参_终点y ＝ 参_起始y)
局_Y ＝ 0


鼠标_相对移动 (局_X, 局_Y)
如果真 (参_起始x ＝ 参_终点x 且 参_起始y ＝ 参_终点y)
局_判断值 ＝ 真
' 跳出循环 ()
程序_延时 (参_移动速度)
处理事件 ()
判断循环尾 ()

.版本 2<br /> <br /> .子程序 鼠标_带轨迹移动, , 公开<br /> .参数 参_起始x, 整数型, 可空, 空为鼠标当前坐标<br /> .参数 参_起始y, 整数型, 可空<br /> .参数 参_终点x, 整数型<br /> .参数 参_终点y, 整数型<br /> .参数 参_移动速度, 整数型, 可空<br /> .参数 窗口句柄, 整数型, 可空<br /> .局部变量 局_判断值, 逻辑型<br /> .局部变量 局_X<br /> .局部变量 局_Y<br /> .局部变量 临时坐标, 精易_坐标<br /> <br /> .如果真 (窗口句柄 ≠ 0)<br />     ClientToScreen (窗口句柄, 临时坐标)<br />     参_终点x ＝ 临时坐标.横 ＋ 参_终点x<br />     参_终点y ＝ 临时坐标.纵 ＋ 参_终点y<br /> .如果真结束<br /> <br /> <br /> .如果真 (是否为空 (参_起始x))<br />     参_起始x ＝ 取鼠标水平位置 ()<br /> .如果真结束<br /> .如果真 (是否为空 (参_起始y))<br />     参_起始y ＝ 取鼠标垂直位置 ()<br /> .如果真结束<br /> .如果真 (是否为空 (参_移动速度))<br />     参_移动速度 ＝ 1<br /> .如果真结束<br /> SetCursorPos (参_起始x, 参_起始y)<br /> .判断循环首 (局_判断值 ＝ 假)<br />     参_起始x ＝ 取鼠标水平位置 ()<br />     参_起始y ＝ 取鼠标垂直位置 ()<br />     .判断开始 (参_终点x ＞ 参_起始x)<br />         局_X ＝ 1<br />     .判断 (参_终点x ＜ 参_起始x)<br />         局_X ＝ -1<br />     .判断 (参_终点x ＝ 参_起始x)<br />         局_X ＝ 0<br />     .默认<br /> <br />     .判断结束<br /> <br />     .判断开始 (参_终点y ＞ 参_起始y)<br />         局_Y ＝ 1<br />     .判断 (参_终点y ＜ 参_起始y)<br />         局_Y ＝ -1<br />     .判断 (参_终点y ＝ 参_起始y)<br />         局_Y ＝ 0<br />     .默认<br /> <br />     .判断结束<br />     鼠标_相对移动 (局_X, 局_Y)<br />     .如果真 (参_起始x ＝ 参_终点x 且 参_起始y ＝ 参_终点y)<br />         局_判断值 ＝ 真<br />         ' 跳出循环 ()<br />     .如果真结束<br />     程序_延时 (参_移动速度)<br />     处理事件 ()<br /> .判断循环尾 ()

                                              精易模块中的鼠标_带轨迹移动

原版的轨迹移动,只能移动在桌面的相对坐标,如果操作的窗口移动后,轨迹移动根本不能在想操作的窗口内进行轨迹移动


改版后的轨迹移动,操作的窗口随意移动位置,都能精确的找到移动后的相对坐标,只需要调用的时候在”窗口句柄”内输入窗口句柄即可,也可空,就是桌面的相对坐标,

jacket12

感谢楼主的分享

hjh2112

网以伤透我心

我父亲是大风大沙发沙发放

纯白色er诺言

厉害啊

kantal

改版后的轨迹移动,操作的窗口随意移动位置

凉忆亦凉心

谢谢大佬分享 支持支持

walter97

改版后的轨迹移动,操作的窗口随意移动位置

nanyanglxy

感谢分享 支持开源

天地予

收藏一下这个做脚本应该用得到 谢谢开源