从StringGrid中取数据，用QuickReport控件做报表出现了奇怪的问题！各位帮忙看看是怎么回事！(100分)

var
i: Integer;
//全局变量
procedure TForm1.QuickRep1BeforePrint(Sender: TQuickRep;
var PrintReport: Boolean);
begin
i:= 0;
end;

procedure TForm1.QuickRep1NeedData(Sender: TObject;
var MoreData: Boolean);
begin
MoreData:= (i<25);
//i的限制如果大于一定的数就会出问题
if MoreData then
begin
col1Label.Caption:= IntToStr(i*1);
col2Label.Caption:= IntToStr(i*2);
col3Label.Caption:= IntToStr(i*3);
col4Label.Caption:= IntToStr(i*4);
col5Label.Caption:= IntToStr(i*5);
col6Label.Caption:= IntToStr(i*6);
col7Label.Caption:= IntToStr(i*7);
col8Label.Caption:= IntToStr(i*8);
col9Label.Caption:= IntToStr(i*9);
col10Label.Caption:= IntToStr(i*10);
Inc(i);
end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
QuickRep1.Preview;
end;

出错提示是：“Cannot create file”。
如果只赋一个值的话
col1Label.Caption:= IntToStr(i*1);
那么它可显示的上限就可以加大。
大家帮看一下是什么问题。怎样可以解决这个问题。

用 rm 或 fast

delphi自带的qr确实有bug,
你可以去qreport的网站下载最新的qr
，试一下

忘记说明了，我用的是Delphi 3，有对应的控件吗？