Configurar qrsPageNumber para receber a última página

Delphi

25/03/2003

Como faço no relatório receber a primeira e última pagina (1/310)


Consorte

Consorte

Curtidas 0

Respostas

Anonymous

Anonymous

25/03/2003

Como faço no relatório receber a primeira e última pagina (1/310)


Private
cPagina: String;
....

QuickRep1.Prepare; // Roda o relatório
cPagina:= qrsPagina.Caption;
QuickRep1.PreviewModal;
....

qrSysData (OnPrint)
Value := ´Página: ´ + Value +´/´+cPagina;

vai numerar as páginas assim:

Página: 1/310
Página: 2/310
.
.
.
Página: 310/310


GOSTEI 0
POSTAR