[[AgustinOrtu]]

Me ha valido unos buenos quebraderos de cabeza en su momento

Es por eso que nunca me gusto tener componentes sino mas bien metodos/funciones que retornen los Query/Command

Código Delphi [-]
function TDataModule.CreateQuery(AOwner: TComponent): TADOQuery;
begin
  Result := TADOQuery.Create(AOwner);
  Result.Connection := FAdoConnection;
end;

function TDataModule.CreateCommand(AOwner: TComponent): TADOCommand;
begin
  Result := TADOCommand.Create(AOwner);
  Result.Connection := FAdoConnection;
end;

Listo, nunca mas me olvide de asignar la propiedad Connection

En tu caso que usaste una ConnectionString distinta podrias agregar una version sobrecargada (overload)