Bonjour,
si CheminApplication:=ExtractFileDir(ParamStr(0)); ou CheminApplication:=ExtractFileDir(Application.ExeName)j'insiste bien sur ExtractFileDir plutôt que ExtractFilePath qui va rajouter un
selon la documentation et mes recherches,à votre place j'essaierai deux choses :
1- ne pas utiliser vendorhome mais mettre directement le chemin entier de la bibliothèque de VendorLib
2- mettre fbClient.dll dans le répertoire de l'application (pas dans un sous répertoire bin)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 FDConnection1.Close; FDPhysIBDriverLink1.Release; // important FDPhysIBDriverLink1.VendorHome:=''; FDPhysIBDriverLink1.VendorLib := TPath.Combine(cheminApplication,'bin\fbclient.dll'); FDConnection1.Open;
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 FDConnection1.Close; FDPhysIBDriverLink1.Release; // important FDPhysIBDriverLink1.VendorHome:=''; FDPhysIBDriverLink1.VendorLib := TPath.Combine(cheminApplication,'fbclient.dll'); FDConnection1.Open;
3-remettre fbclient.dll dans le sous-répertoire bin mais y transférer également les IB_util.dll et icu*.dll ainsi que les runtimes de msv*.dll d'utiliser VendorHome de cette manière
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 FDConnection1.Close; FDPhysIBDriverLink1.Release; // important FDPhysIBDriverLink1.VendorHome:=TPath.Combine(CheminApplication); // toujours sans bin FDPhysIBDriverLink1.VendorLib := 'fbclient.dll'; FDConnection1.Open;
Partager