Delphi 7 QRreport imprimir numero de pagina

[emeritos]

Hola dilferos.

Utilizo Delphi 7 y esto imprimiendo con QRreport y me gustaria imprimir el número de pagina de esta manera 1/10, 2/10 .... o algo parecido.
Lo que quiero es imprimir el numero de pagina y segudo las paginas que hay en esa impresion.

¿Como lo puedo hacer?

Gracias

[Casimiro Notevi]

Debes tener un componente o propiedad que sea algo así como printer.pagetotal, printer.pagenum, printer numoftotal, etc.
Es lo normal en todos los generadores de informes.

[chenech]

Page y TotalPages creo que es lo que necesitas

https://www.fast-report.com/documentation/ProgMan/index.html?numbering_of_pages_in_a_composite_report.htm

[Casimiro Notevi]

Es QuickReport.

[chenech]

Tienes que hacer el prepare para que te devuelva el número de páginas.
Luego guardas el PageCount en una variable y por último le digo que el campo número de página es igual a Value + "/" + variable.
El ejemplo es en C++ pero es casi igual en Delphi creo.

Form165->QuickReport1->Prepare();
short sPaginas = (short)Form165->QuickReport1->PageCount;

[Casimiro Notevi]

El "Prepare" en algunos generadores de informes se llama "Doble pasada".
No sé qué usará qreport.

[chenech]

Si, así es, es una doble pasada para que se carge la propiedad pagecount del report, luego ya puedas usar eso como quieras.
Creo que en Delphi debe ser algo así:
Quickreport1.Prepare;
En C++ es:
Quickreport1->Prepare();