Número total de páginas no QUICKREPORT

Delphi

11/12/2003

Vc sabe como colocar o número total de páginas no QUICKREPORT?


Phfdelphi

Phfdelphi

Curtidas 0

Respostas

Maicongabriel

Maicongabriel

11/12/2003

Insira um componente [i:094e3c88e9]´QRSysData´[/i:094e3c88e9] da Paleta do QuickReport no seu Form, e sete a propriedade [i:094e3c88e9]´Data´[/i:094e3c88e9] dele como [i:094e3c88e9]´qrsPageNumber´[/i:094e3c88e9].


GOSTEI 0
Fabiocor

Fabiocor

11/12/2003

Faça o seguinte procedimento :

//nome de um quick de exemplo
Quick1:=TQuick1.Create(self);

// antes de dar o preview no quick report execute o comando prepare
Quick1.Prepare;

// logo em seguida escolha um label do seu quick que exibirá o total
// e atribua a ele o seguinte comando

Quick1.QRLabel1.Caption:=IntToStr(Quick1.QRPrinter.PageCount);

// depois é só chamar o quick normalmente com o preview

Qr_prev_np4.Preview;
Qr_prev_np4.free;

// Espero ter ajudado, um abraço FÁBIO


GOSTEI 0
POSTAR