Ver Mensaje Individual
  #2  
Antiguo 22-12-2003
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Reputación: 10
marcoszorrilla Va por buen camino
A mí me pasó algo similiar con el pie de una factura, que dependiendo por cuantas líneas no llegara al final de la hoja, me imprimia el "Summary" como encabezado de la siguiente, creo recordar que hice una serie de cálculos para saber con cuantas líneas ocurría esto y este es el código, ni tengo tiempo de analizarlo, ni de más explicaciones, pero mira a ver si te sirve la idea, yo te aseguro que funciona, porque no me ha vuelto a dar ningún problema.

Código:
procedure TfrLptFactura.QRSubDetail1BeforePrint(Sender: TQRCustomBand;
  var PrintBand: Boolean);
  begin
nOpcion:=nOpcion +1;
if nOpcion = 27 then
begin
QrSubDetail1.ForceNewPage:=True;
nOpcion:=0;
end;

end;

procedure TfrLptFactura.LptFacturaStartPage(Sender: TCustomQuickRep);
begin
QrSubDetail1.ForceNewPage:=False;
end;
A mi juicio se debe a un comportamiento inesperado de QuickReport.

Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita