【文件属性】:
文件名称:delphi鼠标模拟源码
文件大小:652B
文件格式:RAR
更新时间:2016-01-17 05:18:19
鼠标模拟
procedure mouseLeftDown; //按下左键
procedure mouseLeftUp; //弹起左键
procedure mouseLeftClick; // 鼠标左键单击
procedure mouseRightClick; // 鼠标右键单击
procedure mouseMoveClick(x,y:integer); // 鼠标移动后左键单击
procedure mouseMoveRClick(x,y:integer); // 鼠标移动后右键单击
procedure mouseMoveTo(x,y:integer); // 鼠标光标移动
procedure mouseLeftDoubleClick; // 鼠标左键双击
// 在(x1,y1)按下鼠标左键,拖动到(x2,y2)--进行选择
// 一般用来选择字串然后删除,注意要完全包含所有要选择的内容
procedure mouseSelect(x1,y1,x2,y2:integer); //通过拖动选择
【文件预览】:
mouse.pas
网友评论
- 谢谢分享,虽然不全,但是可以修复
- 不错,非常好用,再加上全局热键就更好了!(*^__^*) 嘻嘻
- 基本上是不错,但代码里好像还少了什么吧
- 不错,可以达到效果