TKeyEvent = procedure (Sender: TObject; var Key: Word; Shift: TShiftState)
Событие нажатия клавиши.
Параметры:
Sender - источник события.
Key - код нажатой или отпущенной клавиши.
Shift - состояние кнопок Shift, Ctrl, Alt. Множество содержит элемент, если соответствующая клавиша нажата и удерживается.
Ссылки: TWinControl.OnKeyDown, TWinControl.OnKeyUp