Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   vcl crystal reports 8.5 (https://www.clubdelphi.com/foros/showthread.php?t=83129)

DavidSG4 14-05-2013 18:54:51

vcl crystal reports 8.5
 
creo que antes me equivoque de subforo...

Muy buenas
tengo el siguiente problema he actualizado ucrpe32 de crystal 7.5 a 8.5 y tengo este codigo para poder mostrar las tablas temporales el caso que me dan algunos errores por ejemplo retrieve no esta disponible en subreports.retrieve de ucrpe32 de vcl 8.5

la linea que pone ''ElSubReport := SubReports[j];'' me da el error como que no son tipos compatibles

alguien me puede ayudar con alguna alternativa o que me explique que funcion sustituye a retrieve en ucrpe32 de vcl 8.5

muuuchas gracias ayudenmeeee please..

Código Delphi [-]
if SubReports.Retrieve then
  begin
    NumeroReports := SubReports.Count;
    // Hay que tener en cuenta que los subreports contienen el principal report en la posición 0
    for j:= 0 to NumeroReports -1 do
    begin
      ElSubReport := SubReports[j];
      if ElSubReport.Tables.Retrieve then
      begin
        for i:= 0 to ElSubReport.Tables.Count -1 do
        begin
          //ElSubReport.Tables[i].Name := MDEstandar.NombreTabla(Crpe1.Tables[i].Name);
          NombreTabla := ElSubReport.Tables[i].Name;
          if (DefinicionCrystal.FicherosTemporales.IndexOf(NombreTabla) <> -1) then
          begin
            ElSubReport.Tables[i].Name := DataModule.GetNombreRealTablaTemporal(NombreTabla);
            ElSubReport.Tables[i].Path := DataModule.GetPathTablaTemporal(NombreTabla);
          end else begin
            if (MDEstandar.EsTablaGeneral(NombreTabla)) then
            begin
              ElSubReport.Tables[i].Path := MDEstandar.DirectorioBaseDatosGlobal;
            end else begin
              ElSubReport.Tables[i].Path := MDEstandar.DirectorioBaseDatosEmpresa;
            end;
          end;
        end;
      end;
    end;
    // Volver a dejar activo el SubReport de 0, es decir el main report.
    SubReports[0];
  end;


La franja horaria es GMT +2. Ahora son las 19:30:12.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi