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