Problema Conexion a BD de Crystal Reports

[radaalvaro]

Queridos amigos.

Tengo un problema, que me me tiene el borde de la desesperación, hasta ahora no encontre solución. Procedo a explicarles.

Tengo un reporte en Crystal Reports que fue elaborado con una conexión estatica a tabla de una Base de Datos (Llamemos a la base de datos ABC). Hasta ahi, todo va de maravilla.

Bien, en mi programa quiero que ese reporte obtenga los datos de otra base de datos con la misma estructura. Pero lamentablemente no cambia la conexión hacia la nueva BD, y solo me muestra los datos de la BD en la que se diseño es decir ABC. adjunto a continuación el código que uso para hacer el cambio a la BD.

Código Delphi [-]
procedure MuestraReporte;
var 
  cryBase : CrystalDecisions.CrystalReports.Engine.Database;
  crytablas : CrystalDecisions.CrystalReports.Engine.Tables;
  crytabla : CrystalDecisions.CrystalReports.Engine.Table;
  crtablaobj : TObject;
  TablaInfo : CrystalDecisions.Shared.TableLogOnInfo;
  cnx : ConnectionInfo;
  cryDoc : CrystalDecisions.CrystalReports.Engine.ReportDocument;
Begin
  cnx := CrystalDecisions.shared.ConnectionInfo.Create;
  CryDoc := CrystalDecisions.CrystalReports.Engine.ReportDocument.Create;
  cryDoc.Load('Lista.rpt');
  cnx.DatabaseName := 'NuevoSP';
  cnx.ServerName := '.';
  cnx.UserID := 'sa';
  cnx.Password := 'sa';
  CryBase := cryDoc.Database;
  CryTablas := CryBase.Tables;

  for crtablaobj in crytablas do
  begin
    CryTabla := CrystalDecisions.CrystalReports.Engine.Table(crtablaobj);
    TablaInfo := Crytabla.LogOnInfo;
    TablaInfo.ConnectionInfo := Cnx;
    CryTabla.ApplyLogOnInfo(TablaInfo);
  end;

  CryDoc.Refresh;
  Crv.ReportSource := cryDoc;
  Crv.LogOnInfo.Item[0].ConnectionInfo.ServerName := '.';
  Crv.LogOnInfo.Item[0].ConnectionInfo.UserID := 'sa';
  Crv.LogOnInfo.Item[0].ConnectionInfo.password := 'sa';
  Crv.LogOnInfo.Item[0].ConnectionInfo.DataBaseName := 'NuevoSP';
  Crv.Refresh;
end;

Por cierto, no es el código más optimo, ya que se podria acortar mas, pero esta hecho para que simplemente funcione. Pero nada.

Si alguien tiene una idea de cual pueda ser el problema, le agradeceria mucho.

Y tambien les agradezco a todos los que lean este hilo, por su tiempo.

Saludos.