我要把一个adotable中的一列字段的内容加到一个组合框的列表中，以下代码出现问题，急请教。

Question

for i:=0 to ADOtb1.Recordset.RecordCount -1 do
            begin
                cmb1.Items.Add(ADOtb1.Fields[2].AsString);
                ADOtb1.Recordset.MoveNext ;
            end;运行结果，组合框的列表中填了多行，但是，每行的内容都相同。我想把上面的代码ADOtb1.Fields[2].AsString  改成ADOtb1.Recordset.Fields[2].AsString,会出现错误，说是没有asstring的方法。请大家帮忙改正一下代码。谢谢。

Answer 1

Adotbl.First;
cmbl.items.clear;
while not adotbl.eof do begin
   cmbl.items.add(adotbl.fields[2].Asstring);
   adotbl.next;
end;应改成ADOtb1.Recordset.Fields[2].Value;

Answer 2

Why not using dblookupcombobox?