Ver Mensaje Individual
  #3  
Antiguo 21-11-2009
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Reputación: 17
rgstuamigo Va por buen camino
Arrow Correcion

Disculpa... el anterior post es para sacar la cantidad de paginas(PageCount) de un QuickReport;

Para hacerlo con un componente TQRCompositeReport se hace asi:
Código Delphi [-]
var Cantidad_de_Pagina:Integer;
begin
 QRCompositeReport1.Prepare;//preparo el reporte
 Cantidad_de_Pagina:=TQuickRep(QRCompositeReport1.Reports[0]).QRPrinter.PageCount;//saco la cantidad de pagina
 {NOTA: Al sacar la cantidad de pagina del primer QuickReport estoy sacando de todo el reporte,ya que
 los otros reportes estan encadenados a el primer QuickReport.}
end;
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7
Responder Con Cita