[[Caral]]

Hola
No se si esto te sirva pero estuve viendo en adoconection y tal vez sirve para sqlserver, yo lo uso con access, pero si cambias el provider y otras cosas, tal vez funcione.
primero creo un archivo .ini, en este caso lo llamo (Produccion) lo coloco en la carpeta donde esta el ejecutable del programa, dentro de el pongo:
La ruta donde se encuentra la base de datos: y si tiene password.
asi:

[BD]
Path="C:\FIBRESTER\bd\Prod.MDB"
[Logon]
Auto="No"
Login=""
Pass=""

Y Lo guardo
En el datamodule en el evento oncreate pongo esto, por supuesto tienes que cambiarle cosas:

Código Delphi [-]
procedure TDataModule1.DataModuleCreate(Sender: TObject);
Var BaseDeDatos, ConStr : String;
    IniFile: TIniFile;
begin
   // Obtiene la ruta y el nombre de la base de datos
   IniFile := TIniFile.Create(ExtractFilePath(Application.ExeName)+'produccion.ini');
   BasedeDatos := IniFile.ReadString('BD','Path','');
   If BasedeDatos = '' then ShowMessage('Error al cargar Base de Datos');
   ConStr := 'Provider=Microsoft.Jet.OLEDB.4.0;'+
             'Data Source='+BaseDeDatos+';'+
             'Persist Security Info=False;'+
             'Jet OLEDB : Database Password=admin';
   AC1.ConnectionString := ConStr;
   AC1.Open;
end;

este codigo revisa el archivo ini y encuentra la base de datos, tal vez te guie.
Saludos