CanClose spielt verrückt

[dominikkv]

leute...was ist daran so schwierig?

Delphi-Quellcode:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  if passwortabfrage then canClose := true else canClose := False;
end;