Exception bei Datenbankanmeldung

[cam]

Hm, nachdem ich jetzt den Code folgendermaßen geändert habe, nicht mehr:

Delphi-Quellcode:

...
    try
      IB_Database1.Connect;
    except
      on ex: Exception do ShowMessage(ex.Message);
    end;

    if IB_Database1.Connected then
    begin
      ...
    end
    else
    begin
     Close;
    end;

Allerdings wird an der Stelle die Applikation nicht beendet, was toll wäre.