Formular schliessen verhindern, wie?

[implementation]

Delphi-Quellcode:

procedure TForm1.FormClose(Sender: TObject; var CanClose: Boolean);
begin
  CanClose := false;
end;