为菜单项设置“仅查看”快捷方式？

Question

我们知道，如果我们为一个 TMenuItem 设置一个快捷键（例如，Ctrl + F2），一旦按下指定的快捷键，菜单项就会自动执行，并且在显示菜单时也会显示快捷键说明。

但是有没有办法让菜单项上的快捷方式描述可见但使菜单不自动响应快捷方式？

你可能会问我为什么要这个，情况如下：

在多文档（如火狐的多标签）程序中，有多个 TPopupMenu 实例，因此多个 TMenuItem 对象具有相同的快捷方式，但我只希望活动文档窗口中的菜单项响应快捷方式。

---

编辑 1：抱歉，我想简化我的问题，但我错误地描述了它 - 实际上，我使用 TActionList 并将操作链接到菜单项。

---

编辑 2：刚刚发现：我想我可以使用 TApplicationEvents.OnShortCut Event 在将快捷方式分派到菜单/操作之前拦截它们...我会尝试更新我的问题当我得到结果时。

Answer 1

使用制表符 (#9) 字符指示标准菜单中文本的快捷方式部分。您可以设置菜单项的 Caption 属性或菜单项绑定到的操作组件，方法是编辑“dfm”或在运行时包含制表符：

procedure TForm1.FormCreate(Sender: TObject);
begin
  Action1.Caption :=
      Action1.Caption + #9 + ShortCutToText(ShortCut(VK_F2, [ssCtrl]));

除非您还分配给菜单项或操作的ShortCut 属性本身，否则不会触发单击/执行事件。