[Kipow]

Código Delphi [-]
 if (Engine.FreeSpace >=  ReportSummary1.Height -1) then
  begin              
     Engine.CurY := Engine.CurY + Engine.FreeSpace - ReportSummary1.Height -1;
  end
  else
    Engine.NewPage;

Asi lo tengo mira, y me funciona como queres.