Thread: QuickReport 0%
View Single Post
  #7  
Old 25/05/2017
yusnerqui's Avatar
yusnerqui yusnerqui is offline
Miembro
  
Join Date: Mar 2004
Location: Cuba
Posts: 679
Rep Power: 23
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

Last edited by yusnerqui : 25/05/2017 at 00:59.
Reply With Quote