首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

FASTREPORT批量动态创建的MEMO报错,请帮忙看上

2012-10-17 
FASTREPORT批量动态创建的MEMO报错,请帮忙看下!单个动态创建 FASTREPORT里的MEMO可以创建,为什么批量不行

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

Delphi(Pascal) code
//单个创建,可以使用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;


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

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

热点排行