delphi按键问题.....等待解决

Question

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if (shift>=[ssCtrl]) and (key=78) then
begin
application.MessageBox('按键正确,请执行下一步操作','提示',MB_ok);
end;
end;
怎样让按完Ctrl+N之后,执行下一步的操作,ctrl+N不给用.

Answer 1

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; 
  Shift: TShiftState); 
begin 
if (shift>=[ssCtrl]) and (key=78) and (flag=false) then 
begin 
flag = true;
application.MessageBox('按键正确,请执行下一步操作','提示',MB_ok); 
end; 
end;

Answer 2

运行的时候在flag=false处报错..请指教....刚学习delphi,谢谢!

Answer 3

flag:= false
这里是赋值不是判断！