Verbindung zu Datenbank verloren

[backdraft]

Hallo zusammen,

ich hab zwei Probleme zu dem ich bis jetzt keinen Lösungsansatz gefunden habe.

1. Ich habe eine Verbindung zur Datenbank die Connected ist.

Jetzt passiert es, dass der Datenbank-Server neu gestartet wird, ohne das das Programm beendet wird.

Beim nächsten Zugriff auf die Datenbank meldet sowohl Luxena Treiber als auch der ODBC, dass keine Verbindung mehr zur Datenbank besteht.
Die Eigenschaft Connected bleibt aber auf True, sowie der ConnectedState steht auf csStateOpen.

Die Eigenschaft KeepConnection steht auf True.

Habe ich eine Möglichkeit sicher zu gehen, das die Datenbank noch verbunden ist?

Ich könnte natürlich Connected auf False stellen, bei einer Fehlermeldung und danach nochmal die SQL Abfrage ausführen. Wenn ich aber einen anderen Fehler vom SQL bekäme würde ich auch doppelt probieren.

--------------------------------------------------

2. Ebenfalls würde es mich interessieren, wie ich den Timeout ändere, wenn die Datenbank offline ist und das Programm versucht die Datenbankverbindung zu öffnen.
Er bleibt beim Connected := TRUE ca. 60 Sekunden stehen.


Hat jemand eine Lösung zu einem der Probleme?

Danke Oliver