KeyDown事件

我在form的keydown事件里写了东西，但是当我运行程序的时候好像没有起作用，哪位大侠知道是什么原因吗？？
procedure TfrmBase.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Key=VK_F4 then showmessage('F4');
end;

解决方案 »

  1.   

    只要焦点在Form上肯定是有效的，你可能把输入焦点放在其他控件上了！
      

  2.   

    是呀，不能把焦点定位到button或edit上呀，不然你就把form的onkeydown事件中的代码写到每个可以接收焦点的控件上吧
      

  3.   

    form的KeyPreview属性设为True就可以了
      

  4.   

    form的KeyPreview属性默认为False，那只有在空form或form上的控件都无效时，form才能接受键盘事件