Sieh mal bei
TForm.OnClose und
TCloseAcation nach.
Diese Prozedur sollte eine schliessung effektiv verhindern:
Delphi-Quellcode:
procedure TForm1.OnClose(Sender: TObject; Action: TCloseAction);
begin
Action := caNone;
// Hier arbeitet das Programm noch weiter
end;