Hide some pages when I do a print preview

Comments

• gordk St.Catherines On. Canada.

  January 2004 edited 10:16PM

  Hi IMHO you can't
  you can hide designpages but not produced pages.
  regards
• basswar

  January 2004 edited 10:16PM

  I didn't try but maybe works:
  
  Don't call ShowReport directly, instead call PrepareReport;
  Than this code: EMFPages[Index].Visible:=False;
  Than ShowPreparedReport;
  
  Regards:Alex
• basswar

  January 2004 edited 10:16PM

  Hi!
  
  It's me again. I tried and the working code is:
  
  R.PrepareReport;
  R.EMFPages.Delete(DesiredPageIndex);
  R.ShowPreparedReport;
  
  Regards:Alex
  
• tokkie

  January 2004 edited 10:16PM

  Thnx, it works!
• llutti

  January 2004 edited 10:16PM

  Hi,
  
  Other way to hide a page is to set the visible := False before to prepared the report.
  
  See in your example:

  frm_ReportPreview := Tfrm_ReportPreview.Create(Application);
   frm_Reports.fstrp_Test.Preview := frm_ReportPreview.frPreview;
  
  // ********** Correct position  *************
   frm_Reports.fstrp_Test.EMFPages.Pages[3].Visible := False;
   frm_Reports.fstrp_Test.EMFPages.Pages[5].Visible := False;
  
   if not frm_Reports.fstrp_Test.PrepareReport then
     ShowMessage('Not prepared!!!');
  
  // ********** InCorrect position  *************
  // the original position
  // frm_Reports.fstrp_Test.EMFPages.Pages[3].Visible := False;
  // frm_Reports.fstrp_Test.EMFPages.Pages[5].Visible := False;
  
   frm_Reports.fstrp_Test.ShowPreparedReport;
  
   frm_ReportPreview.ShowModal;
  

  
  Luciano
  
• gordk St.Catherines On. Canada.

  January 2004 edited 10:16PM

  Hi all
  be carefull when deleting emf pages by index number, if you are manipulating pages in the final pass of a 2 pass report due to freespace requirements, you will not know the correct emfpage index value untill after you have previewed the report.
  regards
• tokkie

  January 2004 edited 10:16PM

  By the way I'll explain why I need some pages to be hided:
  
  I think the most programs are not good designed. Because on the printdialog you almost never see the button: print preview.
  
  I think that is very strange, because the user can there select a few options, for example he can choose to print only a couple of page by entering the page nummers.
  
  When the user want a preview, he wants exaclty see what the printer will prints. So in my program, I have placed a preview button on the print dialog.
  
  When the user press the preview button, he sees exactly what the printer will prints and that's why I need to hide some pages.