sendmessage中WM_KEYDOWN 消息如何使用,我想向一个记事本自动写一个字符如何实现??(100分)

  • 主题发起人 主题发起人 三井瘦
  • 开始时间 开始时间

三井瘦

Unregistered / Unconfirmed
GUEST, unregistred user!
SendMessage(XXX.handle,WM_KeyDown,VK_Return(或其它),0)
 
可以查看tcxtfile类,帮助中有example
 
 postmessage(handle,WM_char,VkKeyScan('v'),0);
 
D5光盘上有个sndkey32单元,查找到将其copy到delphi5/lib目录,<br>里面有个函数SendKeys。ok,打开你的记事本。<br>uses<br>&nbsp; sndkey32<br>procedure TForm1.Button1Click(Sender: TObject);<br>var<br>&nbsp; handle:Thandle;<br>begin<br>&nbsp; handle:=findWindow('NotePad',nil);<br>&nbsp; handle:=FindWindowEX(handle,0,'Edit',nil);<br>&nbsp; SetForegroundWindow(handle);<br>&nbsp; sendkeys('v',true); &nbsp;//成功<br>&nbsp; //postmessage(handle,WM_KeyDown,byte('v'),0);<br>&nbsp; //postmessage(handle,WM_Keyup,byte('v'),0);//没有成功<br>end;<br>xiaomin说得对,改为这样就行了<br>&nbsp; postmessage(handle,WM_KeyDown,VkKeyScan('v'),0);
 
??又一个?
 
如何让 Windows 模拟按键<br><br><br><br>如何让 Windows 模拟按了一个键,例如按下 ENTER或者 TAB 键? 只需发送一个消息即可:<br><br>PostMessage(Object.Handle<br><br>WM_KEYDOWN<br><br>VK_TAB<br><br>0);<br>
 

Similar threads

回复
0
查看
991
不得闲
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部