Delphi 数字键盘快捷键

Question

我正在尝试使用 Delphi 10 构建主菜单。当我将 menuitem ShortCut 设置为“0”(主键盘)时 - 它工作正常并且看起来像“Item 0”。因此，当我尝试将快捷方式设置为“Num 0”时 - 它也工作得很好，但是，它看起来像之前的“Item 0”。我如何“告诉”用户他必须按 NumPad0 (而不是主键盘零)？

Answer 1

正如维多利亚在主要问题的评论中所说，没有实际的方法来实现这一点(您当然可以在质量门户 https://quality.embarcadero.com 中表明这一点)。

但是，您可以自己绘制菜单项，将 TMainMenu.OwnerDraw 设置为 True 并在以下位置处理 OnDrawItem 或 OnAdvancedDrawItem TMenuItem 级别。

根据菜单的复杂性，这应该不会太困难，并且您只能处理有问题的项目的事件(如果您不处理某个项目的事件，则应该自动绘制该项目)。

如果您希望创建新的继承组件，则应该重写 AdvancedDrawItem 方法。