Ver Mensaje Individual
  #1  
Antiguo 21-02-2020
shoulder shoulder is offline
Miembro
 
Registrado: abr 2008
Posts: 441
Reputación: 17
shoulder Va por buen camino
FastReport enviar datos mediante un while

Hola como delphi y excel es muy lento cuando son mas de 1000 lineas quiero enviar datos a un fastreport y de ahi lo transformo en excel. Pero mi problema que no es solo una tabla sino que por cada linea de excel agrego en cada columna datos. Ejemplo Apellido, nombre, primer sueldo del año..etc. No se como hacer para escribir esto en un fastreport en el masterdetalle.


Seria algo asi que no me funciona: el mastedetalle no esta asociado a ningun dataset y solo me escribe el ultimo registro cuando envio el codigo de abajo. Hay forma mediante este while hacer que el mater tenga como un next para agregar el siguiente registro manual?-
ejemplo: Perez
garcia...





Código Delphi [-]
while not zquery3.EOF do
   begin

          frxReport1.Variables.Variables['apellido']:= QuotedStr(zquery3.Fields[0].AsString);

     zquery3.Next;
   end;

    If frxReport1.PrepareReport() then
      begin
         frxReport1.PrintOptions.ShowDialog := True;
         frxReport1.ShowReport;
      end;
Responder Con Cita