delphi - 如何在操作中从 TShortCut 获取快捷方式字符串？

Question

我正在使用TActionManager，其中每个操作都有一个ShortCut分配给它的键盘。我想向用户显示代表键盘快捷键的文本。例如，F4或Ctrl+F或Ctrl+Shift+S。但是，TShortCut定义为：

type
  TShortCut = Low(Word)..High(Word);

如何获得一个用户可读的字符串，它代表分配给操作的快捷方式？

Answer 1

我正在回答我自己的问题 Q/A 风格。

这个调用有一个内置函数，ShortCutToText()它将任何给定TShortCut的转换为可读的表示。另一方面，也有TextToShortCut()相反的方法，将任何字符串转换为 a TShortCut，因为它是一个有效的快捷方式值。