我正在使用PostMessage向应用程序发送windows消息。现在,当发送除箭头键(VK_RIGHT或VK_LEFT)之外的任何键时,此代码都可以正常工作。
procedure SendKey(key: Variant);
var
lParam: integer;
scancode: integer;
begin
if (VarType(key) = varUString) then
begin
scancode := MapVirtualKey(Ord(VarToStr(key)[1]), MAPVK_VK_TO_VSC);
lParam := scancode shl 16;
PostMessage(_hWindow, WM_KEYDOWN, scancode, lParam);
PostMessage(_hWindow, WM_KEYUP, scancode, lParam);
end else
begin
lParam := MapVirtualKey(key, MAPVK_VK_TO_VSC) shl 16;
PostMessage(_hWindow, WM_KEYDOWN, key, lParam);
PostMessage(_hWindow, WM_KEYUP, key, lParam);
end;
end;
我安装了一个键盘挂钩来监视VK_LEFT/RIGHT的WM_KEYDOWN/UP消息,以查看lParam的外观,我遇到了一些奇怪的值,这是按下向右箭头键(VK_RIGHT)时的DebugView输出。
[2776] wParam: 39, lParam: 21823489
[2776] wParam: 39, lParam: -1051918335
如果我尝试发送带有这些硬编码值的消息,也不会发生任何事情,知道发生了什么吗?谢谢
这取决于应用程序如何处理输入。有时,应用程序直接从消息循环而不是窗口过程处理此问题。有时应用程序使用原始输入。假设您的目标应用程序具有这种性质。
一般来说,这些问题是由试图向不想接受虚假输入的程序伪造输入的人提出的。这是合理的,你将无法伪造输入到你的程序。或者您可以使用SendInput
。这完全取决于目标应用
如果您的目标应用程序准备接受自动化,则应使用可接受的方法,即UI自动化。