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

Question

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

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

如何获取用户可读的字符串来表示分配给操作的快捷方式？

Answer 1

我正在以问答方式回答我自己的问题。

有一个内置函数可以ShortCutToText()将任何给定的内容转换TShortCut为可读的表示形式。另一方面，也有TextToShortCut()相反的工作方式，将任何字符串转换为 a TShortCut，前提是它是有效的快捷方式值。