新版本的(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