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