只有50分了，别嫌少，QReport中长文本打印的问题

报表里需要打印一些类别的分数，后面是一大段文字，大概如下：
-----------------------------------------
 类别1  | 类别2  | .......
-----------------------------------------
 分数1  | 分数2  | .......
-----------------------------------------
然后是大段文字
类别分数用了一个titleband，文字部分用了一个detailband + qrrichtext，但是当文字超过一定长度时就自动转到新页打印，分数下面留下大片空白，请问有什么方法解决我这样调整高度
  contMemo.Height := contMemo.Lines.Count * 16;
  qrBand1.Height := contMemo.Top + contMemo.Height + 10;