QuickReport 复合报表预览尺寸

Question

与简单的 TQuickRep 相反，TQRCompositeReport 组件没有 PreviewInitialState 属性 来控制预览大小。

有什么方法可以最大化预览综合报告吗？

（默认状态为wsNormal）

Answer 1

使用TQRCompositeReport::OnFinished事件：

#include "QuickRpt.hpp"
#include "QRPrev.hpp"

void __fastcall TForm1::QRCompositeReportFinished(TObject *Sender)
{
  for(int i(0); i < Screen->FormCount; ++i)
    if (Screen->Forms[i]->ClassNameIs("TQRStandardPreview"))
      static_cast<TQRStandardPreview *>(Screen->Forms[i])->WindowState = wsMaximized;
}