📄 模拟鼠标的单双击.txt
字号:
模拟鼠标的单双击
1在鼠标的"双击按钮"事件的编写方法
var pt:TPoint;
begin
pt:=edit1.clienttoscreen(point(4,4));
setcursorpos(pt.x+4,pt.y);
//模拟鼠标双击
mouse_event(mouseeventf_leftdown,0,0,0,0);
mouse_event(mouseeventf_leftup,0,0,0,0);
mouse_event(mouseeventf_leftdown,0,0,0,0);
mouse_event(mouseeventf_leftup,0,0,0,0);
end;
2在鼠标的"单击按钮"事件的编写方法
var pt:TPoint;
begin
pt:=edit1.clienttoscreen(point(4,4));
setcursorpos(pt.x+4,pt.y);
//模拟鼠标单击
mouse_event(mouseeventf_leftdown,0,0,0,0);
mouse_event(mouseeventf_leftup,0,0,0,0);
end;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -