Определить переход но новую страницу в композитном отчете

Комментарии

• psk

  January 2012 отредактировано 01:51

  frxReport1.Clear;
  frxReport1.PreviewPages.Clear;
  for datasetkey:=0 to 100 do  // в цикле выбираем нужные нам ID контрагентов для отчета
  begin
  TemplateCnt:=F(datasetkey); TemplateCnt - количество шаблонов для данной записи с datasetkey(может быть разным)
  
  for i:=0 to TemplateCnt-1 do   //  На каждую запись с  datasetkey из базы для разных шаблонов выбираются данные
   begin
   DataSet.Close;
   DataSet.Parameters.ParamByName('datasetkey').Value:=datasetkey;
   DataSet.Parameters.ParamByName('TPLID').Value:=i;   
   DataSet.Open;
   frxReport1.LoadFromFile(  'TEMPLATE_N'+IntToStr(i)+'.fr3'   );
   frxReport1.PrepareReport(false);
   end; // for i
  

  // Для одного контрагента сформировали пачку нужных ему отчетов
  // КАК теперь здесь принудительно вставить переход на следующую страницу?
  // Чтобы следующему контрагенту с новой страницы начать его пачку отчетов.
  // в шаблонах PrintOnPreviousPage:=true
  // И возможно ли уже сформированную пачку отправить на печать и продолжить формирование следующей пачки?
  // И чтобы печать последовательно после формирования каждой пачки добавлялась в одно и тоже задание
  // печати, иначе у ОС будет несварение от количества заданий, т.к. пачек будут десятки тысяч.

  end; //for datasetkey
  
  //frxReport1.ShowPreparedReport;
  frxReport1.Print;
  
• psk

  January 2012 отредактировано 01:51

  С переходом нановую страницу разобрался.
  В начале следующей пачки:
  frxReport1.LoadFromFile(s1);
  if i=0 then TfrxReportPage(frxReport1.Pages[1]).PrintOnPreviousPage := false;
  
  А вот с живой печатью по мере добавления в композит новых отчетов пока вопрос остался...