Boa tarde,

Estou precisando confeccionar um relatório em lote no quick report e
me sugriu uma dúvida.

Como faço para visualizar (preview) um relátório de forma cumulativa,
para ser mais claro, esclarecerei a situação a seguir:

Tenho uma janela de consulta de clientes no delphi e preciso imprimir
a ficha de cada cliente contendo nome, endereço, cpf, etc neste
relatório, esta ficha ocupa, dependendo do caso, até  3 páginas. Só
que para agilizar o processo o usuário precisa imprimir um lote destas
fichas, por exemplo do cliente 50 ao cliente 100.

Portanto o preview desse relatório ficaria da seguinte forma:

Cliente 50:

página 1 de 2, página 2 de 2

em outra página

Cliente 51:

página 1 de 1

Em outra página

Cliente 52:

Página 1 de 3, página 2 de 3, página 3 de 3.

Em outra página

Cliente 53:

página 1 de 2, página 2 de 2

E assim por diante,

Obs: Imprimir eu consigo normalmente com um laço do tipo:

for i := 1 to query_clientes.recordcount do
begin
   quickrep.print;
   query_clientes.next;
end; 

O que não consigo é agrupar todas as fichas em um único preview.

Tentei o seguinte:

for i := 1 to query_clientes.recordcount do
begin
   quickrep.prepare;
   query_clientes.next;
end; 
quickrep.preview;

Mas neste caso somente o último é visualizado.

Alguém que já tenha passado por esta situação poderia me ajudar,

Desde já grato pelo atendimento a esta demanda,

Atenciosamente,

ADENILTON Batista da Silva 
Index Informática LTDA  
-----------------------------
   (79)3431-3234 / 9142-0886 
 [EMAIL PROTECTED]
 www.indexinformatica.com.br

Responder a