在QReport中，多行显示时，QRBand的宽度不够，怎么在运行状态下让QRBand的宽度自动增加？？？

Question

我用QRRichText显示多行数据，当显示两行以上时，QRichText的宽度超过了QRBand的宽度，在这时，怎么自动的增加QRBand的宽度！！！
怎么才能使QRBand的宽度自动适应字段的大小！！！
谢谢！！！

Answer 1

procedure TForm1.QRBand3BeforePrint(Sender: TQRCustomBand;
  var PrintBand: Boolean);
const DefaultMemoHeight = 17;
      DefaultBandHeight = 24;
begin
  QRRichText.Height:= DefaultMemoHeight;
  QRBand3.Height:= DefaultBandHeight;  ...
end;