Asignar ubicacion de la base de datos

[nmenna10]

Hola buenos dias, quisiera hacer una consulta, como tendria que hacer para que desde dentro de mi programa yo pueda cambiar la direccion de la base de datos, mientras lo estoy ejecutando, esto vendria a ser una especie de opcion que trae el programa por si lo quiero cambiar de maquina o algo, para no tener que volver a entrar al codigo cada vez que quiero cambiar la ubicacion de mi BD, ya prove de varias maneras y no lo puedo hacer... si me pudieran ayudar estaria encantadisimo.

Muchas gracias y feliz año nuevo para todos!.

[marcoszorrilla]

Según los casos puedes utilizar un "alias" ó un fichero INI en donde le indiques la situación de la BD.

Un Saludo.

[nmenna10]

hola, y eso como seria, por que no tengo ni idea, la verdad es q soy bastante nuevo en esto...

[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.