文件名称: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