Buenas!
Yo tengo la conexión a mi base de datos de la misma manera. Utilizo una variable global para asignarle la ruta de la base de datos en el principal:
Código Delphi
[-]
ruta:=ExtractFilePath(Application.ExeName)+'nombre.mdb';
y después le asigno esta ruta al ADOConnection antes de hacer la conexión con la base de datos.
Código Delphi
[-]
procedure TDataModule1.ADOConnection1BeforeConnect(Sender: TObject);
begin
ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ Principal.ruta+';Mode=ReadWrite;Extended Properties="";Persist Security Info=False';
end;
Espero que te sirva.
Saludos!!