Hallo,
auch wenn diese Frage hier wahrscheinlich schon gestellt wurde: Ich habe die Antwort trotz intensiver Suche nicht finden können. Liegt wohl an der Uhrzeit.
Folgendes Problem: Ich greife mit MyComponents auf eine
MySQL-Datenbank zu (da ich ein ungeduldiger Mensch bin, habe ich nach mehreren Versuchen davon abgelassen, ZEOS verwenden zu wollen). Um sicherzustellen, dass die Datenbank auch wirklich verfügbar ist, möchte ich die Verbindung beim Programmstart abfragen. Rein aus meinem (wahrscheinlich zu kruden) Verständnis heraus habe ich's mit
Delphi-Quellcode:
try
DBServer.Connect;
except
showmessage('geht nicht');
end;
probiert, was zur Folge hat, dass nach dem Programmstart erst einmal nichts geschieht, bis ich dann irgendwann eine Fehlermeldung erhalte - aber leider nicht mein (besonders einfallsreiches) "geht nicht".
Meine Frage ist nun, wie ich die Verbindung testen und bei Nichtbestehen darauf reagieren kann.
Vielen Dank und gute Nacht
Opa