奇怪的弹出菜单问题

Question

我正在使用 delphi 2009 并创建了一个弹出菜单。

object PopupMenu1: TPopupMenu
  object lmm1: TMenuItem
    Caption = 'lm/m'#178
  end
end

一旦弹出菜单中出现“²”，它就会显示为“lm/m²(L)”。使用 maManual 进行 AutoHotKeys 没有帮助...它仍然以相同的方式显示。它就像热键，因为每个菜单项都有一个新的。

“流明/平方米（L）” “米/平方米（M）” “上午/平方米 (N)” “bm/m² (O)”

如果我希望 (L) 消失，

必须使用“lm/m2”而不是“lm/m²”吗？在国际上使用，我仍然希望“²”能够正确显示。

感谢您的帮助！

Answer 1

这是我在研究/调试 TMenuItem.InternalRethinkHotkeys 和 TMenuItem.GetAutoHotkeys 的源代码后设计的解决方案：

object PopupMenu1: TPopupMenu
  Left = 184
  Top = 272
  object MenuItem1: TMenuItem
    AutoHotkeys = maManual
    Caption = 'lm/m'#178
  end
end

Answer 2

AutoHotKeys 属性适用于按住 ALT 键时的键盘加速器。您所看到的是正在工作的 TMenuItem.ShortCut 属性。对于您不希望出现“(#)”的任何项目，请确保将其设置为 scNone。