[santiago14]

Empezado por David

Gracias, si me ha salido, además he añadido en el evento before print del detailData, el siguiente código:

Código Delphi [-]
procedure DetailData1OnBeforePrint(Sender: TfrxComponent);
begin
  if (Engine.FreeSpace <=  GroupFooter1.Height +15) then
    Engine.NewPage;
end;

donde pongo 15, puede ser 10, 25, etc... hay que ir probando para ir ajustando.

Gracias. Me sirvió de mucho este Post.
Lo comento de paso.
Al parecer, hay un problema en FastReport cuando está poniendo las anclas (Anchors). A veces, la banda de datos empieza como "al ras" del final de la hoja, el ancla indica la hoja 19 pero visualmente el texto comienza en 20 (Esto es un ejemplo de numeración)
En el índice, y en lo usuarios, genera un gran revuelo.
Encontré la solución trabajando con FreeSpace y jugando un poco con los pixeles.
Mando el pedacito de código.

Código Delphi [-]
//Todo esto en el Script de FastReport

{Controlamos que la altura del espacio en blanco (FreeSpace) que va quedando sea menor a cierto
 valor, en pixeles. Con esto, pasamos a nueva página o no}
procedure ControlFinPagina(AlturaMinima:integer);
var
  px:integer;                               
begin
  px:=AlturaMinima;                                        
  if Engine.FreeSpace <= px then
  begin              
    Engine.NewPage;
  end;                  
end;

procedure mdAvisosSeccionAdmOnBeforePrint(Sender: TfrxComponent);
begin
{Controlamos que la altura del final de la página sea menor, o no, que cierto número.
 En base a eso, pasamos o no, a una página nueva}
  ControlFinPagina(30);
end

//El ancla...
procedure rchAvisoAdmOnAfterData(Sender: TfrxComponent);
begin
  Engine.AddAnchor();
end;

Espero que sea de ayuda a los que le pasa lo mismo.