DBGridCode.Columns[i].PickList.append(ADOqueryname.fieldbyname(fieldname).AsString);这个本来就是给下拉框加入了一行!你要想到这个字段的数据全加进去,你要用一个循环啊!简单结构如下: first; while not eof do begin DBGridCode.Columns[i].PickList.append(ADOqueryname.fieldbyname (fieldname).AsString); Next; end;
first;
while not eof do
begin
DBGridCode.Columns[i].PickList.append(ADOqueryname.fieldbyname (fieldname).AsString);
Next;
end;