delphi向当前窗口模拟键盘CTRL+V发送"粘贴"
GetForegroundWindow();可以得到当前窗口句柄。
不过不需要用GetForegroundWindow()。
直接在 uses 中加入
clipbrd
在热键处理函数中加入
clipboard.Clear;
clipboard.AsText:=edit1.Text;
keybd_event($31,0,2,0); //清除你的快捷键
keybd_event(VK_MENU,0,2,0); //清除你的快捷键
Application.ProcessMessages; //清除你的快捷键
keybd_event(VK_CONTROL,0,0,0);
keybd_event($56,0,0,0);
keybd_event($56,0,2,0);
keybd_event(VK_CONTROL,0,2,0);
推荐分享
图文皆来源于网络，内容仅做公益性分享，版权归原作者所有，如有侵权请告知删除！
Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.042893171310425 seconds