Verbindung zu Datenbank prüfen

[shmia]

Zitat von Opa Knack:

Um sicherzustellen, dass die Datenbank auch wirklich verfügbar ist, möchte ich die Verbindung beim Programmstart abfragen.

Dein Ansatz ist schon falsch!!
Man prüft nicht, ob eine Datenbank vorhanden ist und verbindet sich dann zur Datenbank.
Das wäre eine sinnlose Prüfung.
Könnte ja sein, dass die Datenbank genau zwischen der Prüfung und dem wirklichen Verbinden runtergefahren wird.
Nein, man verbindet sich einfach zur Datenbank und entweder es klappt oder es klappt nicht.
Wenn es nicht klappt, dann gibt man dem Benutzer eine aussagekräftige Meldung; das ist ganz wichtig!

Delphi-Quellcode:

try 
  DBServer.Connect; 
except 
  on E: Exception do
  begin
    // wir geben dem Benutzer ein Maximum in Infos
    // was ist passiert, welche Datenbank und was war der eigentliche Fehler ? 
    E.Message := 'Verbindung zur Datenbank '+DBServer.DatabaseName + ' fehlgeschlagen!'#13#10+
      E.Message; 
    raise;   // Exception erneut auslösen
  end;
end;