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);
 

相关阅读 >>

Delphi xe5 android 程序退出功能

Delphi 将程序加裁到启动项

Delphi 图像灰度化处理

Delphi 使用webbrowser控件获取含框架的网页的完整html代码

Delphi向当前窗口模拟键盘ctrl+v发送"粘贴"

Delphi 对提交参数编码

Delphi idhttp组件+idhttpserver组件实现文件下载服务

Delphi实现解析百度搜索结果link？url=

Delphi twebbrowser 获取cookie

Delphi 处理链接和文件路径结尾\和/

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi向当前窗口模拟键盘CTRL+V发送"粘贴"