TShortCutList

 

Add

 

IndexOfShortCut