(I nadzieja prawy rozumieć the Q.)
W raport kopalnia I sprawdzać dla the dostępny przestrzeń przedtem the kolumna i jeżeli ono być mniej wymagać I zmuszać newpage.
To lubić to
procedura TForm1.ColumnHeaderBeforePrint (Nadawca: TQRCustomBand; var PrintBand: Boolowski);
var
Potrzebny: rozszerzony;
zaczynać
DetailBand.ExpandedHeight (Potrzebować); //get the wzrost wymagać the detailband
Potrzebny: = Needed+Sender.Height; //add the columnheader wzrost
jeżeli Potrzebny > QuickRep1.availablespace wtedy
//There być żadny więcej przestrzeń w ten strona? Pozwalać na nowy strona
QuickRep1.newpage;
końcówka;