关于一个API函数的用法 有谁知道mouse_event函数的用法,最好是举个例子!谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 help->windows SDK->搜索mouse_event 函数解释:VOID mouse_event( DWORD dwFlags, // 指定鼠标事件类型 DWORD dx, // 鼠标横向绝对位置(如果dwFlags包含MOUSEEVENTF_ABSOLUTE)或增加量 DWORD dy, // 鼠标横向纵对位置(如果dwFlags包含MOUSEEVENTF_ABSOLUTE)或增加量 DWORD dwData, // 如果dwFlags指定滚动键,这里指定滚动次数;否则应为0 DWORD dwExtraInfo // 指定一个变量,供 GetMessageExtraInfo 使用,以便收集后续信息;一般不使用,设置为0 );例子(点击Button2后,用程序实现Button1的点击):procedure TForm1.Button1Click(Sender: TObject);begin ShowMessage('Button1Click');end;procedure TForm1.Button2Click(Sender: TObject);var P: TPoint;begin P := Point(Button1.Left+1, Button1.Top+1); //取得Button1上一点 P := ClientToScreen(P); //转化为屏幕坐标 SetCursorPos(P.X, P.Y); //将光标移动到Button1上,因此下面的mouse_event使用增加量而不是绝对坐标 mouse_event(MOUSEEVENTF_LEFTDOWN or MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);end;————————————————————————————————————宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。———————————————————————————————————— 制作报表时用qrexpr在PREVIEW时不能显示的问题 五一有没有没有放假的兄弟! 谁有李颖做的数据备份/恢复控件DBBACKUP控件!急用!! Fastreport中frReport的问题?在线等 工控软件的数据采集谁做过!? 到底如何才能实现程序的锁定? CoolBar 的设计 我的系統ie老是出錯,特別是進入csdn後,煩,大家有沒有呀 请教如何将下载的ehlib安装到delphi中? 图表DBCHART的series使用 ####公务贴 :过年期间 midas版导分 投诉贴#### 奇怪的问题,高手入内
VOID mouse_event(
DWORD dwFlags, // 指定鼠标事件类型
DWORD dx, // 鼠标横向绝对位置(如果dwFlags包含MOUSEEVENTF_ABSOLUTE)或增加量
DWORD dy, // 鼠标横向纵对位置(如果dwFlags包含MOUSEEVENTF_ABSOLUTE)或增加量
DWORD dwData, // 如果dwFlags指定滚动键,这里指定滚动次数;否则应为0
DWORD dwExtraInfo // 指定一个变量,供 GetMessageExtraInfo 使用,以便收集后续信息;一般不使用,设置为0
);例子(点击Button2后,用程序实现Button1的点击):
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage('Button1Click');
end;procedure TForm1.Button2Click(Sender: TObject);
var
P: TPoint;
begin
P := Point(Button1.Left+1, Button1.Top+1); //取得Button1上一点
P := ClientToScreen(P); //转化为屏幕坐标
SetCursorPos(P.X, P.Y); //将光标移动到Button1上,因此下面的mouse_event使用增加量而不是绝对坐标
mouse_event(MOUSEEVENTF_LEFTDOWN or MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
end;————————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
————————————————————————————————————