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 时间转成大写

Delphi rgb 画出三角形

设定Delphi环境选项

Delphi 自定义colorbox只显示指定颜色项目 colorbox显示中文颜色名称

Delphi copyfileprogressbar 拷贝文件显示进度条

Delphi format中的换行符号是什么

Delphi 密码框写完后按enter直接登录

Delphi webbrowser载入自定义html内容并显示

Delphi xe5 android程序常用的unit

Delphi 执行dos命令并捕获输出

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

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