Asignar ubicacion de la base de datos

[marcoszorrilla]

Ejemplo de INI.
[Camino]
String=127.0.0.1:C:\Delphi7\Programasfb\Marcos\BDMARCOS.FDB

Código ubicado en el DataModule que realiza la conexión a la BD,(el ejemplo es con Firebird y las IBX.

Código Delphi [-]
procedure TDmMarcos.DataModuleCreate(Sender: TObject);
var
MiCarpeta:String;
MiFicheroIni:TiniFile;

begin
MiCarpeta:=ExtractFilePath(Application.ExeName);
  Try
  //Abrir el INI
  MiFicheroIni := TIniFile.Create (MiCarpeta+'MZFB.ini');
  IBDatabase.Connected:=False;
  //Pasar los parámetros al Componente IBDatabase
  IBDatabase.DatabaseName:=MiFicheroIni.ReadString ('Camino', 'String','Error');
  //Abrir Base de datos
  IBDatabase.Connected:=True;
  //Abrir transación
  Ibtransaction.Active  :=True;
  //Abrir Dataset
  
  Except
  ShowMessage('No se pudo acceder al fichero '+Mificheroini.FileName  );
  end;
  //ShowMessage(ExtractFilename(IbDatabase.DatabaseName));
end;

Un Saludo.