如何动态设置FastReport纸张大小？

[LaoDaifu]

同上

[roy456myth]

帮顶！！

[fangsp]

打印机 可以设置吧
动态设置好象实现不了
但可以设置页边距的

[御影北斗]

var 

    frReport: TfrReport;

frReport.pages[0].pgsize:=DMPAPER_A4; //DMPAPER_A4 纸张大小

[LaoDaifu]

你好:
我试了不行

[panrongzeng]

3楼代码是可以的，你把它写在哪里?

[LaoDaifu]

frReport1.Pages.Clear;
frReport1.Pages.Add;
page:=frReport1.Pages[0];

b:=TfrBandView(frCreateObject(gtBand,''));
b.SetBounds(0,20,0,20);
b.BandType :=btMasterData;
b.DataSet :='frDBDataSet1';
Page.Objects.Add(b);

v :=frCreateObject(gtMemo,'');
v.SetBounds(20,20,200,16);
v.Memo.Add('[Ahz."hz"]');
page.pgWidth:=30;
// page.pgSize:=DMPAPER_A3; //DMPAPER_A4 纸张大小
page.Objects.Add(v);
page.pgWidth:=30;
page.pgSize:=DMPAPER_A3; //DMPAPER_A4 纸张大小

frReport1.ShowReport;