Asignar BBDD con archivo .ini

[[BlueSteel]]

Hola molina669

yo realice un proceso para tener los datos de configuración desde un archivo .ini... eso si trabaje con Interbase..

en el Form donde tengo el menu, tengo esto..

el Form Datos corresponde a un datamodule donde tengo la conexión con la base

Código Delphi [-]
procedure TMenu.FormCreate(Sender: TObject);
Var
   Parametro:Tinifile;
begin
   If not DirectoryExists('D:\Sistemas\ProyectoX') Then
      Begin
          {$I-}
           MkDir('D:\Sistemas\ProyectoX');
      End;
     if FileExists('D:\Sistemas\ProyectoX\config.ini') Then
        Begin
             Parametro := TiniFile.Create('D:\Sistemas\ProyectoX\config.ini');
             Datos.IBD_Compras.Connected := False;
             Datos.IBD_Compras.DatabaseName                := Parametro.ReadString('BaseDato','Servidor',' ');
             Datos.IBD_Compras.Params.Values ['user_name'] := Parametro.ReadString('BaseDato','Usuario',' ');
             Datos.IBD_Compras.Params.Values ['password']  := Parametro.ReadString('BaseDato','Clave',' ');
             Datos.IBD_Compras.Connected := True;
             Parametro.Free;
        End
     Else
        Begin
             ShowMessage('Debe Seleccionar Base de Datos para continuar');
             Man_Datos := TMan_Datos.Create(Self);
             Try
                Man_Datos.ShowModal;
// Aqui lo envio a un modulo que hice para ingresar los datos de conexión correspondientes
// En el caso de que no exista el archivo .ini
             Finally
                Man_Datos.Free;
             End;
        End;
end;

si tienes dudas.. me avisas