TShortCutList
Add
IndexOfShortCut