On PageFooter1OnBeforePrint execute Engine.ShowBand(Child1) program terminate
Sorry, my English not well.
On Page1 Add MasterDataBand, PageFooterBand and ChildBand
MasterData link to BDETable
when program run to Engine.ShowBand(Child1); then program terminate.
On Page1 Add MasterDataBand, PageFooterBand and ChildBand
MasterData link to BDETable
var
  PageLine: integer;
  PageMaxLine: integer = 15;
 Â
procedure PageFooter1OnBeforePrint(Sender: TfrxComponent);
var     Â
  i: integer;
begin
  i := iif(PageLine=0,PageMaxLine,PageLine);                                       Â
  while i < PageMaxLine do
  begin
    inc(i); Â
    Engine.ShowBand(Child1);     Â
  end;
end;
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
  PageLine := <LINE> mod PageMaxLine;
  if (PageLine = 1) and (<LINE> > 1) then
  begin
    Engine.NewPage;                                               Â
  end;           Â
end;
when program run to Engine.ShowBand(Child1); then program terminate.
Comments
also keep in mind that it is sometimes usefull to have a header/footerband of zero height so that you have the events of these bands available for processing code to make other things happen before reaching the page footer.
for example filling remainig space on page with a unattached child band after the recordset is finished.
in the oap event of the databandfooter
retreive the engine.freespace divide it by the height of the child band and in a fornext loop show the child.
if int(engine.freespace/child1.height) > 0 then
begin
for i = 1 to int(engine.freespace/child1.height) do
begin
engine.showband(child1);
end;
end;
Thank you for telling me.
i clear my write code
add one footer
set footer hieght = 0
add code listed below:
now working well.