QuickReport como colocar numero de pagina assim Pagina 1/3
algéum sabe se tem como imprimir no quick report a pagina assim:
Página : 1/3
onde 1-pagina atual
3-total de páginas.
Página : 1/3
onde 1-pagina atual
3-total de páginas.
Weber
Curtidas 0
Respostas
Fava
22/07/2003
Após ver muitas pessoas querendo saber como fazer para colocar em um relatório feito no QuickReport, Total de páginas do relatório resolvi disponibilizar aqui para todos como fazer isso.
Para criar o Relatório faça o seguinte:
frmRelatorio := TfrmRelatorio.Create(self);
frmRelatorio.QuickRep1.Prepare;
frmRelatorio.qrlPagina.Caption := ´ de ´+IntToStr(frmRelatorio.QuickRep1.QRPrinter.PageCount);
frmRelatorio.QuickRep1.Preview;
Ai é só vc contatenar o qrSysData que traz a página atual com esse qrlPagina(TQRLabel) que eu criei nesse exemplo.
Dica retirada da paginan http://www.delphicompany.hpg.ig.com.br/
Fernando Gonçalvez
Para criar o Relatório faça o seguinte:
frmRelatorio := TfrmRelatorio.Create(self);
frmRelatorio.QuickRep1.Prepare;
frmRelatorio.qrlPagina.Caption := ´ de ´+IntToStr(frmRelatorio.QuickRep1.QRPrinter.PageCount);
frmRelatorio.QuickRep1.Preview;
Ai é só vc contatenar o qrSysData que traz a página atual com esse qrlPagina(TQRLabel) que eu criei nesse exemplo.
Dica retirada da paginan http://www.delphicompany.hpg.ig.com.br/
Fernando Gonçalvez
GOSTEI 0