FastReport的动态页面设置

新版本的(4.xx)的FastReport有发很大改动，在动态设置页面时，有个地方纠结了好久，特记录下:

var
  p:TfrxReportPage;
begin
  p:=TfrxReportPage(frxrptFitting.Pages[1]);
  p.PaperSize:=DMPAPER_A4;
  p.TopMargin:=PageMarginFitting.Top;
  p.LeftMargin:=PageMarginFitting.Left;
  p.RightMargin:=PageMarginFitting.Right;
  p.BottomMargin:=PageMarginFitting.Bottom;
  p.Orientation:=PageDirectFitting;
end;

这儿注意Pages[0]现在是指向固定的Data页面了，打印页面是从Pages[1]开始，就是这儿卡了好久。后面在网上找到4.XX的文档说明后才知道，汗……

还有在设置标准页面时(就是WINDOW里已经注册的标准页面时)，只要指定PaperSize就好(FastReport会根据这个ID来设置PaperWidth和PaperHeight)，如果是自定义大小，则：

  p.PaperSize:=DMPAPER_USER;
  p.PaperWidth:=MyPaperSize.Width;
  p.PaperHeight:=MyPaperSize.High;

DMPAPER_USER(值为$100),表示用户自定义大小

要设置页面宽和高,单位是mm

转载于:https://www.cnblogs.com/jankerxp/p/7774036.html