delphi中用虚拟键盘模拟 粘贴功能

Question

我程序中向别的窗体发出Ctrl+V的虚拟键盘消息：
  PostMessage(Hnd2,WM_KEYDOWN,VK_CONTROL,1900545);
  PostMessage(Hnd2,WM_KEYDOWN,86,3080193);  PostMessage(Hnd2,WM_KEYUP,86,3224305665);
  PostMessage(Hnd2,WM_KEYUP,VK_CONTROL,3223126017);其中Hnd2是程序的子窗体（这种父子关系是通过spy++查询到地址，或者用函数GetWindow(Hnd2,GW_HWNDNEXT)遍历到的），现在问题是，如果是写字板（NotePad ），可以将剪贴板的内容正确粘贴，但如果是word、IE（用鼠标点击事件来确定光标位置）就只能将 【V】这个字符输入到编辑框中。可以发出鼠标右击时间，但不能继续发送[P]按键消息。
不知道怎么回事？如果才能在这些软件中实现粘贴的虚拟按键？
请赐教。

Answer 1

模拟啥按键啊，你用实现光标定位后直接把剪贴板的内容贴发过去uses Clipbrd;var
  str: PChar;
begin
  str := PChar(Clipboard.AsText);
  SendMessage(句柄, WM_SETTEXT, strlen(str), Integer(str));
end;