with dm.ADOQuery7 do begin
first;
for i:=0 to combobox3.Items.Count-1 do begin
edit;
fieldbyname('id').asstring:=inttostr(i);
fieldbyname('项目').asstring:=combobox3.Items[i];
post;
next;
end;请问这段语句有什么问题,为什么只能显示出最后一条记录,怎样才能全部复制?
first;
for i:=0 to combobox3.Items.Count-1 do begin
edit;
fieldbyname('id').asstring:=inttostr(i);
fieldbyname('项目').asstring:=combobox3.Items[i];
post;
next;
end;请问这段语句有什么问题,为什么只能显示出最后一条记录,怎样才能全部复制?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货