Tema: QuickReport 0%
Ver Mensaje Individual
  #8  
Antiguo 25-05-2017
Avatar de yusnerqui
yusnerqui yusnerqui is offline
Miembro
  
Registrado: mar 2004
Ubicación: Cuba
Posts: 679
Reputación: 21
yusnerqui Va por buen camino
Bueno así de una rápida lectura creo que te falta, en el NeedData, reiniciar tu consulta cuando llegue al final para poderla imprimir nuevamente, debes poner algo como

Código Delphi [-]
...  
if moredata then
    QConsulta.Next; 
else
    QConsulta.First;


Espero te sirva.

Saludos
__________________
Lo importante no es llegar primero, sino saber llegar.

Para que puedas llegar mejor lee la Guia de Estilo

Última edición por yusnerqui fecha: 25-05-2017 a las 00:59:53.
Responder Con Cita