Key: Integer;
Свойство Key определяет код клавиши, которая была нажата или отпущена.
Для проверки клавиш используйте значения, доступные в перечислении Keys. В данном свойстве не различаются символы в верхнем и нижнем регистрах и символы кириллицы и латинские.
Для выполнения примера предполагается наличие формы. На форме расположено несколько компонентов, которые могут принимать фокус. В качестве обработчика события OnKeyDown для всех компонентов используется следующая процедура:
Sub ProcedureOnKeyDown(Sender: Object; Args: IKeyEventArgs);
Begin
If (Args.ShiftState = ShiftState.Ctrl) And (Args.Key = Keys.B) Then
Text := (Sender As IControl).Name;
End If;
End Sub ProcedureOnKeyDown;
После выполнения примера, если в области какого-либо компонента было нажато сочетание клавиш "Ctrl+B", то в наименование формы будет выведено наименование этого компонента.
См. также: