Hi,
beim Beenden werden nur ein paar belanglose Objekte zerstört und die Verbindung zur Datenbank getrennt:
Delphi-Quellcode:
destructor TtlDatabase.Destroy;
begin
if (FConnection.Connected) then
Disconnect;
FreeAndNil(FConnection);
inherited;
end;
Markus: Das hatte ich schon versucht. Es läuft eine Zeile nach Application.Run (also auf das end.) und dann passiert nichts mehr.