Einzelnen Beitrag anzeigen

SarDGer

Registriert seit: 19. Mai 2005
55 Beiträge
 
Delphi 7 Professional
 
#1

Datei im Netzwerk finden ohne unc Pfad

  Alt 18. Apr 2007, 07:23
Moin Moin,

ich hab da ein kleines Problem...
und zwar läd eine meiner DLLs eine firebird gdb, wenn ich connected auf True
setzte kann es zu einer exception kommen, in diesem Fall soll auf eine andere
Datenbank ausgewichen werden (mit Try except abgefangen). Das funktioniert
alles auch ganz Toll.
Es kommt zwar immer 'ne nervige Exception wenn ich im Delphi das Programm starte,
aber die ist ja abgefangen.
ungefähr so: (Delphi7)

Delphi-Quellcode:
try
  TestDB.Databasename := '\\TestComputer:c:\test\Test1.gdb'
  TestDB.Connected := true;
except
  TestDB.Databasename := '\\TestComputer:c:\test\Test2.gdb'
  TestDB.Connected := true;
end;
Jetzt das Problem:
Da die DLL dynamisch geladen wird muss sie ja auch wieder entladen werden.
Und genau da hängt sich die DLL aufrufenden (bzw. entladenede) Applikation auf.
Danach bewegt sich nix mehr...

Ich hatte die waage Hoffnung über TIBDatabase mit einem Fileexist, oder Ähnliches,
die Try Except Geschichte zu umgehen und somit ohne Exeption auszukommen.
Wenn der gar nicht erst in den Except-Part springt habe ich das Problem nicht.
Natürlich befindet sich die gdb nicht lokal und ausser dem Databasepath ist nichts
bekannt also auch keinen Unc-Pfad.(wäre ja auch zu einfach dann...)
Also hab ich nur Rechnername und Lokalerpfad auf diesem Rechner.
Hab aber nichts gefunden.

Vielen dank im voraus.

Sar D'Ger
  Mit Zitat antworten Zitat