for i:=1 to ADOQuery1.RecordCount do combobox1.Items.Add(ADOQuery1.Fields[0].AsString); 我想把查到的那个字段对应的几条记录都加到combobx1的下拉列表中来,不成功,把第一个记录重复了adoquery1.recordcount次,所以我写的肯定是错的,请哥哥们指教哈!
procedure TFrm_InMZSF.CBB_YFNameDropDown(Sender: TObject);
var
s: string;
begin
CBB_YFName.Items.Clear;
with DM.ADOQuery_YK do
begin
close;
open;
First;
while Not Eof do
begin
s := FieldByName('Cangk_Mc').AsString;
CBB_YFname.Items.Add(s);
next;
end;
end;
end;