[Delphi 2005 + Interbase] Paramétrer le chemin la Database
Bonjour à tous,
J'ai une application Delphi qui utilise plusieurs DataModule (composants IBX avec Interbase 6.0). Cette appli étant destinée à être installée chez différents clients, l'emplacement de la base de données doit donc être paramétrable.
J'aimerais connaître votre avis avant de mettre en oeuvre :
D'après votre expérience, quelle est la meilleure façon de paramétrer le composant IBDatabase dans ce contexte ?
Pour aller un peu plus loin, j'ai pensé à faire ceci :
l'événement OnCreate de chaque fiche utilisant un Datamodule initialise ce dernier de la façon suivante :
Code:
1
2
3
|
if not Assigned(DataModule7) then DataModule7:= TDataModule7.Create(self);
RecupBDD(ParamAppli.PathBDD); |
et chaque DataModule comporte cette procédure :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
|
Procedure RecupBDD(BDD : string);
var Reponse : word;
begin
try
DataModule4.IBDatabase.DatabaseName := BDD;
except
Reponse:=MessageDlg('Bases de données non trouvées.'+ #10+#13 +
'Arrêt de l''application', mtError, [mbAbort], 0);
halt;
end ;
end; |
La variable BDD est récupérée dans le fichier INI de l'application.
Qu'en pensez-vous ?
Merci de votre aide.
