手动构建时如何进行自动横向快速报告VCL？

Question

我使用快速报告生成运行时报告，我需要在

时更改页面方向

FastReport.Engine.PageWidth>MyPage.PaperWidth

在ManualBuild中

。

我设置MyPage.Orientation:=poLandscape但报告是横向和预览，打印物理页面是纵向。

我的新想法：

procedure TBaseReporter.PrepareReport(pClearLastReport: boolean);
begin
  GenerateReport;
  FastRep.PrepareReport(pClearLastReport);
  if NeedLandscape then
  begin
    GenerateReport;
    GetReportPage(cPage).Orientation:=poLandscape;  //change main report page orientation
    FastRep.PrepareReport(pClearLastReport);
  end;
end;

如何实现NeedLandScape函数？