delphi - 将 ALT-S 发送到窗口

Question

我正在尝试使用 PostMessage 向对话框提示发送 ALT-S 来保存文件:

PostMessage(h, WM_KEYDOWN, VK_MENU, 0);
PostMessage(h, WM_KEYDOWN, ord('S'), 0);
PostMessage(h, WM_KEYUP, ord('S'), 0);
PostMessage(h, WM_KEYUP, VK_MENU, 0);

但是它不起作用。它发送两个键，但就好像对话框无法识别 ALT 条件，而是将其作为普通的 S 字符处理。

我读了很多书，包括 this (这会产生错误)，看来我需要在 lparam 中做一些事情来指示 ALT 被抑制。有些消息来源说 0x20000000 但这也不起作用。

SendInput、keybd_event 等对我不起作用，因为对话框不会成为焦点。

我很困惑，希望得到一些见解。

Answer 1

试试这个:

PostMessage(h, WM_SYSKEYDOWN, VK_MENU, 0);
PostMessage(h, WM_KEYDOWN, ord('S'), 0);
PostMessage(h, WM_KEYUP, ord('S'), 0);
PostMessage(h, WM_SYSKEYUP, VK_MENU, 0);