如何使用好評如潮的報告設置頁面大小

Question

我在Delphi 2010中有一個項目，我正在使用RaveReport通過代碼生成PDF報告，我的問題是我想知道是否有可能以及如何設置PDF頁面的大小（高度和寬度）。

我嘗試過，但沒有得到：

var PWidth: Double;

PWidth := 20;
System.BaseReport.PageWidth := PWidth;

並嘗試了這個：

System.BaseReport.SetPaperSize(DMPAPER_USER, 2100, 1400); 

有什么辦法嗎？

Answer 1

解決我的問題的方法：

procedure TfrmLogger.RvSystemBeforePrint(Sender: TObject);
begin
  with Sender as TBaseReport do
    begin
      Units := unInch;
      UnitsFactor := 1;
      SetPaperSize(DMPAPER_USER, 21, 29.7);
      Units := unCM;
      UnitsFactor := 2.54;
    end;
end;