我想使用全局桌面 HotShortCut 发送 WM_HOTKEY 以被其他应用程序捕获。
预期的键是 CTRL + F10
这是我发现触发 WM_HOTKEY 捕获的唯一方法:
procedure TfmMain.ButtonTalkClick(Sender: TObject);
var
Article: TArticleBase;
Msg: TMessage;
begin
Article:= GetSelectedArticle;
if Article <> nil then
begin
Clipboard.AsText:= Article.SelectedText;
Msg.LParamLo:= MOD_CONTROL;
Msg.LParamHi:= VK_CONTROL or VK_F10;
PostMessage(HWND_BROADCAST, WM_HOTKEY, 0, Msg.LParam);
end;
end;
如果我更改 Msg.LParamLo 或 Msg.LParamHi 的任何值,WM_HOTKEY 不会被其他应用程序触发。但是使用这种方式,在消息 WM_HOTKEY 被 Method 捕获之前:
procedure ManageHotKeyMsg(var Msg: TMessage); message WM_HOTKEY;
执行“Windows 执行对话框”(快捷键“Windows 键”+R)
如何正确传递 Msg.LParamLo 和 Msg.LParamHi,以确保我发送 WM_HOTKEY +“CTRL + F10”。