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

How to get a shortcut string from TShortCut in an action?

我正在使用 TActionManager,其中每个操作都分配了一个键盘 ShortCut。我想向用户显示代表键盘快捷键的文本。例如,F4Ctrl+FCtrl+Shift+S。但是,TShortCut 定义为:

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

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

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

有一个名为 ShortCutToText() 的内置函数,可将任何给定的 TShortCut 转换为可读表示。另一方面,还有 TextToShortCut() 以相反的方式工作,将任何字符串转换为 TShortCut,只要它是一个有效的快捷方式值。