quickreport的刷新？(100分)

var
c:array[0..30] of Tqrdbtext;var
i:smallint; count:integer; p:array[0..30] of TqrLabel;
t:array[0..30] of tQRShape;
tt:array[0..30] of tQRShape;
begin
count:=data.DataModule2.ADOtable4.fieldcount;
for i:=0 to 30 do //COUNT表示字段的总数
begin
t:=tqrshape.create(application); tt:=tqrshape.create(application);// t表示表格框
p:=tqrlabel.create(application); c:=tqrdbtext.create(application); //P表示tlabel控件数组
t.parent:=ColumnHeaderBand1; p.parent:=ColumnHeaderBand1; //parent表示把控件画在哪里
tt.parent:=DetailBand1; c.parent:=DetailBand1;
end;
t[0].left:=0;
for I:=count to 30 do
begin
t.Enabled :=false;tt.Enabled :=false;p.Enabled :=false;c.Enabled :=false;
end;
for i:=0 to count-1 do //COUNT表示字段的总数
begin
p.Caption:=data.DataModule2.ADOtable4.Fields.FieldName;
c.DataSet:= data.DataModule2.ADOtable4;
c.DataField:=data.DataModule2.ADOtable4.Fields.FieldName;
end;
adotable4是由用户选择产生的，根据以上代码，如果上次选择的字段比较多，就会残留到
下一次，如出现两个“姓名”，请问高手，如何解决？

自己 手动 判断 吧

给你10分

每次都重新增加.

多人接受答案了。