Forzar una nueva pagina al llegar a un punto determinado?

[URBANO]

Hola foro, tengo el siguiente problema:
He realizado una factura con qreport y necesito que cuando llegue a un determinado número de líneas salte al siguiente folio.
Yo he utilizado lo siguiente:

procedure TFlisfactura.QRSubDetail1AfterPrint(Sender: TQRCustomBand;
BandPrinted: Boolean);
begin
linea:=linea+1;
if linea = 24 then
begin
QRSubDetail1.ForceNewPage:=True;
end;

end;

El problema es que cuento el número de veces que se imprime el Qrsubdetail, pero este puede variar de tamaño (el ancho) con lo cual no me vale.
Alguien sabe algun otro método?