Bei mir ist das in der
DB.INI hinterlegt und die befindet sich genau da, wo auch das Programm liegt.
Der Rest ist einfach :
Delphi-Quellcode:
procedure TDM.DataModuleCreate(Sender: TObject);
var Ini : TIniFile;
begin
Ini := TIniFile.Create (ExtractFilePath (ParamStr (0)) + '
DB.INI');
DatenBankName := Ini.ReadString('
Datenbank-Ort','
DBName',
...
DataBase.Close;
DataBase.DatabaseName := DatenBankName;
//showmessage ('*'+Datenbankname+'*');
DataBase.Open;