如何提高该报表（fastReport）的生成速度，在线等!

最近在做一个报表，其中有十多列是统计字段，原来的做法在一个TADOQuery中添加十多个计数字段，加上报表要显示总页数，所以FastReport要两遍生成，以至报表生成的时候太慢了，后来我在数据库（Sql2000）写了个返回表类型的自定义函数，速度明显提高，我想问除了这种方法外，如果要在Delphi中用程序控制应该采用什么方法来提高报表的生成速度