Question

Delphi窗口的FormKeyDown事件为什么不能响应。

代码

procedure TFrmMonitor.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Case key of
VK_F1: Memo1.Lines.Add('F1');
VK_F2: Memo1.Lines.Add('F2');
VK_F3: Memo1.Lines.Add('F3');
VK_F4: Memo1.Lines.Add('F4');
end;
end;

然后运行的时候按F1 F2 F3 都没有反应。 断点也没有执行。

Answer 1

Form.KeyPrivew := true;

Answer 2

你是不是没有链接到events里面