How can i print many copies from the same page?

Comments

• -=Den=-

  October 2005 edited 1:33PM

  Hi!
  
  You have 4 pages in the preview or in the designer?
• jorkf

  October 2005 edited 1:33PM

  I have 4 pages in designer (tfrxReportPage), and i wanna print these 4 pages, but the page ONE i wanna print 3 times, for example.
  
  Then will be print the sequence of pages: 1 1 1 2 3 4
  
  Understand me??
  
  Thanks for help!
• -=Den=-

  October 2005 edited October 2005

  Try this code:

  procedure Page1OnManualBuild(Sender: TfrxComponent);
  var
  i:integer;
  DataSet: TfrxDataSet;
  begin
  DataSet := MasterData1.DataSet;
  for i:=1 to 3 do {count of 1-st pages}
  begin
  DataSet.First;
  while not DataSet.Eof do
  begin
  Engine.ShowBand(MasterData1);
  DataSet.Next;
  end;
  if i<3 then Engine.NewPage;{if not last then create new}
  end;
  end;