Fórum Total Paginas QuickReport #394148
21/01/2011
0
Caros amigos, utilizo o Delphi 7 com o QuickReport 4 e venho enfrentando a seguinte dificuldade, aqui na empresa geramos laudos de pacientes que podem ter 1 ou mais paginas e se faz necessário sair em todas as paginas o numero atual e o total destas, meu codigo esta assim:
QrImprimi.Prepare;
LbtPaginas.Caption := '/ ' + IntToStr(Qrimprimi.QRPrinter.PageCount); até ai tudo bem, ele exibe no Preview o numero correto da pagina atual e do total de paginas, só que quando dou um print ele imprime sempre 1 pagina a menos que o total exibido mas não sai faltando nada, o que notei é que o preview é diferente do que sai impresso, como resolvo isso ? PS. Alguem saberia me dizer se existe a possibildade de se dar um print mas não imprimir nada, apenas para eu pegar o total de paginas ??? Att. Oscar Luiz
LbtPaginas.Caption := '/ ' + IntToStr(Qrimprimi.QRPrinter.PageCount); até ai tudo bem, ele exibe no Preview o numero correto da pagina atual e do total de paginas, só que quando dou um print ele imprime sempre 1 pagina a menos que o total exibido mas não sai faltando nada, o que notei é que o preview é diferente do que sai impresso, como resolvo isso ? PS. Alguem saberia me dizer se existe a possibildade de se dar um print mas não imprimir nada, apenas para eu pegar o total de paginas ??? Att. Oscar Luiz
Oscar
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)