Imprimir dentro de un bucle

[ciscu]

Hola a todos!!!

Veréis, tengo un pequeño problema con la impresora cuando intento imprimir varias facturas de golpe, es decir, utilizo el siguiente código:

while not (query1.eof) do
begin
-----------
-----------
quickrep1.print;
query1.next;
end;

donde en query1 le digo el intervalo de facturas que debe imprimir.

Pues el problema es que cuando se imprime la factura nº 50 me sale un mensaje de error del spoolsv.exe y me "peta" el programa; supongo que es algo de la memoria, que se va reduciendo hasta que "peta".

Podéis ayudarme a que cada vez que se hace quickrep1.print se vacie la memoria usada o cualquier otra solución para que no aparezca este error?

Cualquier ayuda será bien recibida

Gracias anticipadas!!!