fastreport2.4页高度代码中如何设定 ( 积分: 50 )

在纸张设为自己定义后
如果在代码中赋值定义纸张的高度
我是这样写了，但预览出来的高度不是50,始终是菜单中paper option 中选择原高度
procedure TF_print_barcode.frReport1BeforePrint(Memo: TStringList;
View: TfrView);
begin
frReport1.Pages[1].PaperHeight :=50;
end;

在纸张设为自己定义后
如果在代码中赋值定义纸张的高度
我是这样写了，但预览出来的高度不是50,始终是菜单中paper option 中选择原高度
procedure TF_print_barcode.frReport1BeforePrint(Memo: TStringList;
View: TfrView);
begin
frReport1.Pages[1].PaperHeight :=50;
end;