Adicionar numero de páginas na impressão do documento

Delphi

08/10/2004

Dúvida com wwDBRichEdit.....

Adicionar numero de páginas na impressão do documento....

mais detalhes
msn : asp@iscc.com.br



[b:8a2b74cace]Título editado: ´Dúvida com InfoPower, Me ajudem.......´[/b:8a2b74cace]
Complementando a resposta da gandalf.nho: no título, procure descrever resumidamente seu problema.
Por favor, leia as [url=http://delphiforum.icft.com.br/forum/viewtopic.php?t=6689]Regras de Conduta[/url] do fórum.
Sandra/Moderação


Alexspaes

Alexspaes

Curtidas 0

Respostas

Delphi32

Delphi32

08/10/2004

quanto a sua dúvida sobre o wwDBRichEdit eu não sei não porque não uso esses componentes, mas para imprimir o número de páginas se você estiver usando QuickReport basta antes do comando Print ou Preview fazer o seguinte:

begin
   Form2.QuickRep1.Prepare;
   Form2.Paginas := Form2.QuickRep1.QRPrinter.PageCount;
   //Agora você pode imprimir ou dar Preview
   Form2.QuickRep1.Preview;
end;


Form2.Paginas é uma variável que eu criei lá só pra você entender como fazer.

Agora no evento BeforePrint da Band onde o Label está você coloca o seguinte:

begin
   QRLabel1.Caption := ´Página ´+IntToStr(QuickRep1.PageNumber)+´ de ´+IntToStr(Paginas);
end;


até!


GOSTEI 0
Gandalf.nho

Gandalf.nho

08/10/2004

[b:10de0fd5a1][color=red:10de0fd5a1]Notificação de Infração às Regras de Conduta :[/color:10de0fd5a1][/b:10de0fd5a1]

Uso de termo considerado apelativo ´Me ajudem´

Para maiores esclarecimentos pode mandar-me uma [url=http://delphiforum.icft.com.br/forum/privmsg.php?mode=post&u=8378]Mensagem Particular[/url].


GOSTEI 0
POSTAR