关于模拟键盘的输入 谢谢(100分)

  • 主题发起人 阿登学编程
  • 开始时间

阿登学编程

Unregistered / Unconfirmed
GUEST, unregistred user!
在delphi中,可以用下面的句子向edit1中发送键盘a键按下。但有没有别的方法可以不
需要取得句柄就可以模拟输入的呢?(类似鼠标键盘记录器)谢谢
PostMessage(Edit1.Handle, WM_KEYDOWN, 65, 0);
 
setcursorpos,keybd_event试试看,我没空试验一下!
 
procedure MyKeyPress(Key: word);
begin
keybd_event(Key, MapVirtualKey(Key, 0), 0, 0);
keybd_event(Key, MapVirtualKey(Key, 0), KEYEVENTF_KEYUP, 0);
end;

使用:MyKeyPress(Ord('a'));
那么'a'将会出现在当前有输入焦点的地方(无论它是否有句柄)
 
to beta
我用了你的这个方法,是可行的,不过不知道为什么当想要输入'a'时却输入了'1'
而大写的'A'却输入为小写的'a'
因为我看不太明白英文的help文件,所以不能搞清你这个方法的意思,也不知道问题出在
哪里,,,,,,你能帮我详细的解释一下这个过程吗?谢谢[:)]
 
Virtual Key codes?
 
这有篇文章
http://www.china-pub.com/computers/emook/1166/info.htm
 
多人接受答案了。
 

Similar threads

D
回复
0
查看
745
DelphiTeacher的专栏
D
S
回复
0
查看
743
SUNSTONE的Delphi笔记
S
D
回复
0
查看
747
DelphiTeacher的专栏
D
顶部