fastreport问题：如何动态设置报表的纸型？（急！！！） (100分)

我想通过程序生成报表，其中设置纸型我这样做：
frReport1.Pages.Clear;
frReport1.Pages.Add;
fPage := frReport1.Pages[0];
fPage.pgOr := poLandscape;

fPage.pgSize := 12;
//纸型定为B4横排
frReport1.Pages[0].ChangePaper(frReport1.Pages[0].pgSize, 0, 0, 0, frReport1.Pages[0].pgOr);
//使frReport1的打印方向为Page中设定的方向
结果预览出的报表居然是比A4还小的纸型，横排是没问题的，如果
fPage.pgSize := 9;
则恰好是A4纸型
我的作法有何错误，请高手指点！另外，自定义报表如何设置？

难道没有人遇到这样的问题吗？？大伙帮帮忙吧，项目紧啊！

应该是打印机的问题，
你现在的打印机不支持比A4还大的纸张。

居然真是这样，气死我了！！！
谢谢可儿！