FASTREPORT批量动态创建的MEMO报错，请帮忙看下！

[aBung]

单个动态创建 FASTREPORT里的MEMO可以创建，为什么批量不行啊，找不到原因，知道的请帮忙看下
没分了，全部家当了！求解

//单个创建，可以使用
procedure TForm1.btn2Click(Sender: TObject);
var
    Memo:TfrxMemoView;
begin
    Memo:=TfrxMemoView.Create(frxrprt1.findobject('PageFooter1'));
    Memo.Name:='Memo1';
    Memo.Text:='123';
    Memo.Height:=20;
    Memo.Width:=40;
    Memo.Top:=10;
    Memo.Left:=10;
    Memo.WordWrap:=True;
    Memo.CreateUniqueName;
    Memo.Visible:=True;
frxrprt1.showReport;
end;

//批量创建，出错
procedure TForm1.btn1Click(Sender: TObject);
var
    Memo:array[0..20] of TfrxMemoView;
    i,k:Integer;
begin
    k:=0;
    for i:=1 to 2 do
    begin
    Memo[i]:=TfrxMemoView.Create(frxrprt1.findobject('PageFooter1'));
    Memo[i].Name:='Memo'+inttostr(i);
    Memo[i].Text:='123';
    Memo[i].Height:=20;
    Memo[i].Width:=40;
    Memo[i].Top:=10;
    Memo[i].Left:=10+k;
    Memo[i].WordWrap:=True;
    Memo[i].CreateUniqueName;
    Memo[i].Visible:=True;
    k:=k+10;
    end;
frxrprt1.showReport;
end;

[kaikai_kk]

名称不要用Memo1...MemoN
可以是Memo[i].Name:='M'+inttostr(i); 或者其它;

至于为什么,自己看看源码吧

[aBung]

[Quote=引用 1 楼 的回复:]

名称不要用Memo1...MemoN
可以是Memo[i].Name:='M'+inttostr(i); 或者其它;

至于为什么,自己看看源码吧
[/Quote]

果然，呵呵，受教了，还是没养成看源码的习惯。。。