Почему мой обработчик событий OnKeyDown моей формы не срабатывает?

Я создал событие OnKeyPress/OnkeyDown и установил точку останова, чтобы узнать, вызвано ли событие, но оно не вызвано каким-либо образом.

Где проблема?

EDIT:

procedure TFormMain.FormKeyDown(Sender: TObject; var Key: Word; 
    Shift: TShiftState); 
begin 
    Beep; //breakpoint is set here. 
end;

Код мероприятия? – Havenard

Beep; Это код. И на нем есть точка останова, но она никогда не достигает этой точки останова. –

Вы хотите, чтобы мы сказали вам, насколько велики ваши ноги? :) –

Вы можете попробовать установить

Form1.KeyPreview := True;

Может быть, это событие не правильно делегированы до формы.

EDIT: после просмотра ссылки. Я думаю, вы, вероятно, сделали это, так как это указано в статье. Может, вы забыли эту линию?

2009-08-18 14:28:29 jpfollenius

@John: Вы можете установить его и в Инспекторе объектов, а затем вам не нужно будет его вводить. –

ответ