如何把数据库里找到的内容

Question

请问如何把数据库里找到的内容按顺序一个一个的赋给ComboBox1

Answer 1

sql:= 'select XXX from table order by XXX';
  combobox1.clear;
  try
    adoquery1.Close;
    adoquery1.SQL.Clear;
    adoquery1.SQL.Add(sql);
    adoquery1.Open;
    for I:= 0 to ComControls.adoquery1.RecordCount-1 do
    begin
      combobox1.Items.Add(adoquery1.FieldByName('XXX').AsString);
      adoquery1.Next;
    end;
  except
    showmessage('');
  end;

Answer 2

with ADOQuery1 do
  begin
    Frist;
    while not eof do
    begin
      ComboBox1.Items.Clear;
      ComboBox1.Items.Add(FieldByName('字段名').AsString);
      Next;
    end;
  end;

Answer 3

adoquery1.Close;
    adoquery1.SQL.Clear;
    adoquery1.SQL.Add('Select Field1 from Table1 ');
    adoquery1.Open;
    ComboBox1.Items.Clear;
    while not AdoQuery1.Eof do
    begin
      combobox1.Items.Add(adoquery1.FieldByName('Field1').AsString);
      adoquery1.Next;
    end;

Answer 4

ADOQuery1.Frist;
  ComboBox1.Items.Clear;
  while not ADOQuery1.eof do
  begin
    ComboBox1.Items.Add(FieldByName('XXX').AsString);
    Next;
  end;

Answer 5

好像还有一种更快的，直接一次性赋给ComboBox的，我好像见过，找找看还能不能找到。