QuickReport 0%

[[Espartaco]]

hola casimiro, gracias plor contestar, pero qué es lo que tengo que poner en afterprint, porque en realidad el listado me lo genera bien, lo que pasa es que creo que se queda al final y por eso me pone lo del 0% y cuando le doy a imprimir hace como que imprime pero no envia nada a la impresora.

gracias, estoy desesperado.

[yusnerqui]

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

[[Espartaco]]

Hola yusnerqui, efectivamente con lo que me has propuesto se ha solucionado y ya imprime desde el preview, aunque no entiendo muy bien por qué pero funciona.

Es que es la primera vez que utilizo el needdata y todavia no lo tengo muy bien asumido.

Muchas gracias por tu ayuda, y a los demas tambien.

Si no fuera por este foro ...

Muchas Gracias.