Enumerar paginas en quickreport (1 de 2)

[negrokau]

Hola amigos... se que a lo mejor para algunos sera sencillo, pero mi pregunta es como enumerar las paginas del quickreport ejemplo (1 de 2) o (1/2), probe algunas formas pero no me funcionan ninguna de ellas.... les agraadeceria su ayuda... desde ya muchas gracias... linda semana para todos....

[look]

Empezado por negrokau

Hola amigos... se que a lo mejor para algunos sera sencillo, pero mi pregunta es como enumerar las paginas del quickreport ejemplo (1 de 2) o (1/2), probe algunas formas pero no me funcionan ninguna de ellas.... les agraadeceria su ayuda... desde ya muchas gracias... linda semana para todos....

coge un QRSysData y ponlo en la banda que tu quieras, luego de vas a la propiedad data del componente y veras varias opciones entre ellas qrsPageNumber

[juanlaplata]

Otra alternativa:
Colocar un TQRExpr llamada PageNum en la banda que quieras mostrar ( FooterBand en mi caso).
En la propiedad Expression colocar 'Página ' + STR(PAGENUMBER) + ' / '

Código Delphi [-]
       ...
       Form1.Reporte.Prepare;
       i := Form1.Reporte.QRPrinter.PageCount;
       Form1.PageNum.Expression := Form1.PageNum.Expression + '+'+ QuotedStr(intToStr(i)) ;
       Form1.Reporte.Preview;
       ...