TKeyPressEvent = procedure (Sender: TObject; var Key: Char)

Событие нажатия клавиши.

Параметры:

• Sender - источник события.
• Key - клавиша.

Ссылки: TWinControl.OnKeyPress