报表的默认记录问题！（不知哪位用过速达3000的）(100分)

在一个报表中，即使没有记录的时候，他也会显示15行记录的空格，反正要求一页有
15行的记录，我用的是qreport，用shape来画格，但是不可能画15行吧，哪位大侠知道该
怎么做呢？？？？

打印前先统计记录总数RecCount.
在Qreport的BeforePrint事件中:
for i:=1 to 15-(RecCount mod 15)do
///加入空记录使
begin
Table.Append;
Table.FieldByName('某个字段').AsString:='XXX';
Table.Post;
end;

在对应'某个字段'的QrDbText的OnPrint事件中:
if Value='XXX' then
Value:='';
最后在Qreport的AfterPrint事件中:
while Table.FieldByName('某个字段').AsString='XXX'do
begin
Table.Delete;
end;

接受答案了.