How to refresh composite reports?

Comments

• gpi

  May 2013 edited 3:07AM

  frxReport1.Preview := nil;
  frxReport1.PrepareReport(True);
  frxReport1.PrepareReport(False);
  frxReport1.PrepareReport(False);
  frxReport1.Preview := frxPreview1;
  frxReport1.ShowPreparedReport;
• Lorne

  June 2013 edited 3:07AM

  gpi wrote: »

  frxReport1.Preview := nil;
  frxReport1.PrepareReport(True);
  frxReport1.PrepareReport(False);
  frxReport1.PrepareReport(False);
  frxReport1.Preview := frxPreview1;
  frxReport1.ShowPreparedReport;

  Thanks - that does work but I am surprised I have to recreate all the reports. Why aren't they still in memory somewhere so I can just reshow them ?
  
  I have a similar issue trying to print one page from a prepared composite report. The only solution I can get working is to delete all the other pages, print the page left, then recreate the whole report again unless somebody can tell me I have missed some option somewhere.
• gpi

  June 2013 edited 3:07AM

  frxPreview1.Lock;
  frxReport1.Print;
  frxPreview1.UnLock;
  
  or
  
  frxReport1.PreviewPages.Print;
• Lorne

  June 2013 edited 3:07AM

  gpi wrote: »

  frxPreview1.Lock;
  frxReport1.Print;
  frxPreview1.UnLock;

  
  Many thanks for that - works perfectly and feels a much better solution than recreating the report.
  
  Is there a way to print one page from the report and keep the whole report available for preview? At the moment I delete all the pages except the one in view, print the remaining report (ie one page)then recreate the report which does not feel at all like a good solution other than it works.
• gpi

  June 2013 edited 3:07AM

  frxReport1.PrintOptions.PageNumbers := '2';
• Lorne

  June 2013 edited 3:07AM

  gpi wrote: »

  frxReport1.PrintOptions.PageNumbers := '2';

  I already tried that - it does not work and get all pages printed whatever value I give to PageNumbers. Remember that I have already created the report and it is being viewed in a preview screen and I want to print just one page out of (say) 8 pages in a prepared composite report.
• gpi

  June 2013 edited 3:07AM

  wrote:

  I already tried that

  Show your code
• Lorne

  June 2013 edited June 2013

  gpi wrote: »

  gpi wrote: »

  I already tried that

  Show your code

  
  procedure TPrintPreviewFm.BtnPrintPageClick(Sender: TObject);
  begin
  frxPreview.Lock;
  MainView.frxReport.PrintOptions.PageNumbers := IntToStr(frxPreview.PageNo);
  if YNPrint.Ticked then MainView.frxReport.Print;
  if YNpdf.Ticked then MainView.frxReport.Export(frxPDFexport);
  frxPreview.Unlock;
  end;
  
  This procedure is on the preview form. frxReport and frxPDFexport and the code for frxUserDataSet1GetValue are on the main form (MainView) because they are accessed from several different places (not just the preview form). I have also tried hard coding the page as '3', and frxPreview.Print. The user will not know which single page they want until after looking at the preview since the program is a complex monte carlo simulation and they need to look at the output to see if they want it all or just some of it. The preview is a composite report made up from 2, 3 or 4 separate reports.