fastreport自定义纸张为什么不生效

[zlinlin]

预览和打印都是A4的格式，而且抬头还空白了一截。
void __fastcall TPartReport::frxReport1BeforePrint(
TfrxReportComponent *Sender)
{
for(int i=1;i<frxReport1->PagesCount;i++)
{
((TfrxReportPage*)frxReport1->Pages[i])->EndlessHeight=false;
((TfrxReportPage*)frxReport1->Pages[i])->PaperSize=256;
((TfrxReportPage*)frxReport1->Pages[i])->PaperWidth=2420;
((TfrxReportPage*)frxReport1->Pages[i])->PaperHeight=1400;
}
}

[xjq2003]

((TfrxReportPage*)frxReport1->Pages[i])->PaperSize=256;//是这个设置的问题吧？

[zlinlin]

自定义应该是什么呢？用DMPAPER_USER也不行