
(*
 Delphi Object and Component Reference
#{bmc bm9.BMP} ShortCutToText example
This line converts the menu shortcut assigned to the OpenCommand to a string and displays it in an edit box:
Edit1->Text = ShortCutToText(OpenCommand->ShortCut); 
