Hallo,
ich habe folgendes Problem.
Ich möchte meine Datenbankverbindung anpassen und ein Dialog (ÄHNLICH wie UDL Datei) für den Bunutzer anzeigen lassen wenn die Datenbankverbindung fehl schlägt.
Ist zB. der
DB-Name falsch kommt eine Fehlermeldung von Windows/SQLServer und das finally wird nicht mehr ausgeführt.
Benutze MSSQLServer 2008R2 Express
Delphi-Quellcode:
// Verbindungsaufbau zum SQL Server
ADOC_ChristDB.Connected := false;
ADOC_ChristDB.ConnectionString := SQL_Server;
try
ADOC_ChristDB.open;
finally
if ADOC_ChristDB.Connected = false
then
begin
ADOC_ChristDB.close;
OpenSQLServerForm := TOpenSQLServerForm.Create(Application);
//
OpenSQLServerForm.ShowModal;
//Application.Terminate;
end;
end;
Danke für eure Hilfe
Grüße Pet