procedure TfrmCarReal.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
   //屏蔽“alt+f4”键对窗口的关闭操作
   if (ssAlt in Shift) and (key=115) then
          Key:=0;
   //f9打开口令窗口
   if Key=120 then begin     //F9
    iIsOpenBox:=0;
    If Not Assigned(frmLogin) Then begin
      frmLogin:=TfrmLogin.Create(Self);
   end;
      frmLogin.ShowModal;
  end;
end;
上面的代码实现屏蔽窗体frmCarReal的alt+F4,并且当F9按下时,弹出窗体frmLogin,当在frmCarReal窗体上使用Page Control控件后,上面的FormKeyDown事件就失效了,用groupbox等控件就好使,一直找不到原因!
各位老大帮帮忙啊!着急中!