[Aleca]

antes del preview ó printer tenes que hacer lo siguiente:

Código Delphi [-]
nCantidadHojas := QuickReport1.QRPrinter.PageCount;
//Despues pones un label de esta forma
QRCantHojas.Caption :=  'de ' + IntToStr(CantHojas);