SendMessage 模拟鼠标点击
2012-12-07 10:29
621 查看
使用SendMessage 模拟鼠标点击 [问题点数:25分,结帖人Game4s]
账号:Game4s昵称:该用户很懒,没设置昵称关注 博客空间 最新帖子: 使用已存在的SOCKET连接发送封包... 使用SendMessage 模拟鼠标点击 如何使用其他进程的SOCKET发送数... 更多 >> Game4s 该用户很懒,没设置昵称等级: 结帖率:100% | |
楼主 发表于: 2008-11-16 23:42:20 | |
已知目标窗口的句柄 hWnd 如何根据自定义的X,Y坐标值使用SendMessage向目标窗口发送鼠标点击指令? 请给出实例代码.非常感谢 | |
对我有用[0] 丢个板砖[0] 引用 | 举报 | 编辑 删除 管理 | TOP 回复次数:8 |
chenyq2008 该用户很懒,没设置昵称等级: 结帖率:85.51% | |
#1 得分:0 回复于: 2008-11-17 00:24:02 | |
SendMessage(hWnd,WM_LMOUSEDOWN,x,y); | |
专访陈抒:C++至今不可替代 对我有用[0] 丢个板砖[0] 引用 | 举报 | 编辑 删除 管理 | TOP |
yuqianyi1974 老于等级: 结帖率:100% | |
#2 得分:22 回复于: 2008-11-17 07:59:48 | |
SendMessage(hWnd, WM_LBUTTONDOWN, MK_LBUTTON, makelparam(x,y)); | |
IBM 邀您分享国内外迁移Power案例 对我有用[0] 丢个板砖[0] 引用 | 举报 | 编辑 删除 管理 | TOP |
yuqianyi1974 老于等级: 结帖率:100% | |
#3 得分:0 回复于: 2008-11-17 08:00:35 | |
SendMessage(hwnd, WM_LBUTTONDOWN, MK_LBUTTON, makelparam(x,y)); | |
【免费】解读海外市场营销奥秘 对我有用[0] 丢个板砖[0] 引用 | 举报 | 编辑 删除 管理 | TOP |
zhaoxiaohao yekong等级: 结帖率:98.21% | |
#4 得分:1 回复于: 2008-11-17 08:24:01 | |
用RegisterwindowMessage注冊唯一窗口标识 send方 var Form1: TForm1; UserMessage:UINT; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin SendMessage(FindWindow('TForm1','RegisterMessage Get Example'),UserMessage,0,0); //'RegisterMessage Get Example'接受窗口名字caption end; procedure TForm1.FormCreate(Sender: TObject); begin UserMessage:=RegisterwindowMessage('System Wide User Defined Message'); end; get方: var Form1: TForm1; UserMessage:UINT; implementation {$R *.dfm} procedure TForm1.DefaultHandler(var Msg); begin inherited DefaultHandler(Msg); if (TMessage(Msg).Msg=UserMessage) then begin button1.Click; end; end; procedure TForm1.FormCreate(Sender: TObject); begin UserMessage:=RegisterWindowMessage('System Wide User Defined Message'); end; procedure TForm1.Button1Click(Sender: TObject); begin showmessage('ok'); end; | |
对我有用[0] 丢个板砖[0] 引用 | 举报 | 编辑 删除 管理 | TOP |
yuqianyi1974 老于等级: 结帖率:100% | |
#5 得分:0 回复于: 2008-11-17 08:25:37 | |
SendMessage(hwnd, WM_LBUTTONDOWN, MK_LBUTTON, makelparam(x,y)); | |
对我有用[0] 丢个板砖[0] 引用 | 举报 | 编辑 删除 管理 | TOP |
zhangxiaommmm 大学生等级: 结帖率:100% | |
#6 得分:1 回复于: 2008-11-17 08:27:19 | |
GetCursorPos(m);是取鼠标位置。 WindowFromPoint(m)是取M坐标点处的句柄,在这里当然也就是鼠标的位置。 sendMessage(WindowFromPoint(m), WM_LBUTTONDOWN, 0, 0); SendMessage(WindowFromPoint(m), WM_LBUTTONUP, 0, 0); | |
对我有用[0] 丢个板砖[0] 引用 | 举报 | 编辑 删除 管理 | TOP |
w5750584 该用户很懒,没设置昵称等级: 结帖率:50% | |
#7 得分:1 回复于: 2008-11-17 19:50:29 | |
用mouse_event 函数多好 | |
对我有用[0] 丢个板砖[0] 引用 | 举报 | 编辑 删除 管理 | TOP |
Game4s 该用户很懒,没设置昵称等级: 结帖率:100% | |
#8 得分:0 回复于: 2008-11-17 19:51:32 | |
自己解决了。 其实关键就是lParam 的格式问题. 前面几位回答的MakeLParam 函数没有尝试过,自己用了个 StrToInt(#36+IntToHex(Y,4)+IntToHex(X,4))) 达到了预期效果。结贴给分了 |
相关文章推荐
- c# 在WebBrowser中用SendMessage模拟鼠标点击
- sendmessage()模拟鼠标点击
- c# 在WebBrowser中用SendMessage模拟鼠标点击
- sendmessage()模拟鼠标点击
- sendmessage()模拟鼠标点击
- WEBBROWSER中模拟鼠标点击(SendMessage/PostMessage)
- Webbrowser中模拟连接点击(非鼠标模拟)
- jquery模拟鼠标点击动作
- 用js模拟鼠标点击事件(事件触发)
- ListBox控件模拟鼠标点击事件
- QT中模拟鼠标点击事件
- 模拟鼠标点击
- jquery如何在页面加载完成后模拟出一个鼠标点击事件?
- java Robot 类模拟键盘按键和鼠标点击(全局模拟)
- python模拟鼠标点击window图标
- JS 模拟鼠标点击
- 原生js及H5模拟鼠标点击拖拽
- 用SendMessage函数模拟按钮的点击
- 【转】如何用SendMessage模拟某一按钮的点击事件
- 使用Python来模拟鼠标的点击