Delphi怎么让程序像屏幕键盘那样单击按钮时

 我来答
威azpy333信
2018-05-21 · 超过38用户采纳过TA的回答
知道答主
回答量:79
采纳率:87%
帮助的人:9.1万
展开全部
详细??你自己说的就不够详细.
你说的记事本,是windows带的那个??
你的意思是,自己写个程序,对某记事本操作??
如果只是这样的话,干吗不自己直接对文件操作??
就算要操作的话,我给你个思路吧.
首先获得某记事本的handle,然后对他发送windows操作代码,比如按键....
至于各自的记事本,一个道理,你开几个记事本,拦截几个,对他们操作就行拆衫了.如果要在后台,可以做个多线程就很舒服了.

var
Gameh:HWND;//定义一个句柄变量
begin
GameH:=FindWindow('name',nil);//这个是根据窗口类名查找窗口句柄
SendMessage(Gameh,messages.WM_LBUTTONDOWN,0,$01DF0153);
SendMessage(Gameh,messages.WM_LBUTTONUP,0,$01DF0153);
end;
//SendMessage的参数1是窗口句柄,喊肆
//参数2是常量,模拟鼠标按下(messages.WM_LBUTTONDOWN),后面一个是模拟鼠标弹起(messages.WM_LBUTTONUP)。
//参数3可以不填,这里没用
//参数4是窗口中需要点击的那个按钮在窗口中对应的坐标。是16进制的。你的(100,200)也需要转换成16进制。我这里是填的另外个坐标,郑御轿你改下就可以了、

这样够清楚了吧
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式