模拟鼠标问题！(我认真学习) ( 积分: 100 )

  • 主题发起人 主题发起人 176347774qq
  • 开始时间 开始时间
1

176347774qq

Unregistered / Unconfirmed
GUEST, unregistred user!
怎么模拟鼠标的..左键按下和释放？..要求点击我设置好的坐标！<br><br>谢谢大家问答小弟的问题！！
 
怎么模拟鼠标的..左键按下和释放？..要求点击我设置好的坐标！<br><br>谢谢大家问答小弟的问题！！
 
setcursorpos(30,120);//点击这个30，120坐标<br>mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);//按下<br>mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);//放开
 
这位大哥..这个代码可以.但是他使真正的鼠标移动...我想搞虚拟的.....不影响真正的鼠标!!
 
先记录鼠标位置，模拟操作后，马上还原。用户是看不出区别的。但是如果点击的地方导致窗口焦点切换，那是没有办法的。不要告诉我你打算模拟鼠标点击非焦点窗口的按钮而打算不引起窗口焦点发生变化，那是不可能的。
 
这样可以...但是我不懂怎么还原鼠标...麻烦下 告诉我谢谢![:D][:D]
 
用这个还原不就行喽setcursorpos(30,120);//<br>这里假设(30,120)是你记录下来的坐标
 
那又怎么得知本来的鼠标地址？
 
var p:Tpoint;<br>getcursorpos(p);<br>//p.x,p.y就是当前鼠标的坐标
 
好象那样还是不是虚拟的鼠标地址是吗?<br> &nbsp;我以前有格外方法不知道现在还可以用不!1
 
wzwcn 怎么把结果输到edit1.text 那里？
 
什么结果？
 
你这是模拟点击和模拟输入吧。<br>GetCaretPos &nbsp; 得到光标位置<br>GetWindowsEx &nbsp; &nbsp;从光标处得到该Edit的句柄<br>SendMessage &nbsp; &nbsp; 发送消息<br>不过输入中文的话不太好办。
 
看看这个帖子。<br>http://www.delphibbs.com/delphibbs/DispQ.asp?LID=1383155
 
我认为执行这两个函数的时候，肯定要得到当前鼠标的指针位置<br>不知道<br>setcursorpos(30,120);//点击这个30，120坐标<br>上面的函数执行后，两个数值存放在那里，进行改动就可以了<br>mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);//按下<br>mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);//放开
 
我认为执行这两个函数的时候，肯定要得到当前鼠标的指针位置<br>不知道<br>setcursorpos(30,120);//点击这个30，120坐标<br>上面的函数执行后，两个数值存放在那里，进行改动就可以了<br>mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);//按下<br>mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);//放开
 
您必须登录或注册才可回复。

Similar threads

老
学习中的一些牢骚。栈/堆地址标准写法。
回复
0
查看
1K
老衲
老
S
[转]ClientDataSet加上TDataSetProvider的数据保存问题
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
[转]ClientDataSet加上TDataSetProvider的数据保存问题
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
[原]Delphi XE4 For IOS真机调试配置教程
回复
0
查看
1K
DelphiTeacher的专栏
D
I
无边界窗体移动方法
回复
0
查看
597
import
I
后退
顶部