Ninguém sabe?

Delphi

22/10/2003

Olá tudo bem,

Gostaria de saber se existe alguma maneira para monitorar a impressão, sabendo pelo menos quantas folhas foram impressas. Não faço a mínima idéia.

Alguém pode me ajudar? Existe algum componente que faça isso?

Uso Delphi 6.

Grato,


Anderson Belém

Anderson Belém

Curtidas 0

Respostas

Japa

Japa

22/10/2003

Se voce esta usando o Quickreport faça assim:
No evento AfterPreview do seu componete TquickRep escreva o seguinte codigo:
ShowMessage(´Foram ´+IntToStr(QpTroca.QRPrinter.PageCount)+´ paginas´);

Ele vai mostrar quantas paginas foram impressas....


GOSTEI 0
Anderson Belém

Anderson Belém

22/10/2003

Se voce esta usando o Quickreport faça assim: No evento AfterPreview do seu componete TquickRep escreva o seguinte codigo: [quote:80df7f42b5] ShowMessage(´Foram ´+IntToStr(QpTroca.QRPrinter.PageCount)+´ paginas´);

Ele vai mostrar quantas paginas foram impressas....[/quote:80df7f42b5]


Valeu cara!!
Já lanço outro desafio para os feras um programa para contar quantas páginas foram impressas através do gerenciador de impressão do windows. Ex: Impressão do Word/Internet etc.

Mas valeu mesmo!!!


GOSTEI 0
POSTAR