请问如果用DBcombobox中自动读取数据库某字段

Question

譬如dbcombobox自动读出表中name字段，那我只需要在数据库里面增加/删除姓名，就反映在dbcombobox下拉列表中，而不需要我进行编程处理。该如何做？

Answer 1

procedure TForm1.FormShow(Sender: TObject);
begin
  DBComboBox1.DataSource := DataSource1;
  DataSource1.DataSet := ADOQuery1;
  ...
  ADOQuery1.SQL.Add('select * from tablename');
  ADOQuery1.Open;
  DBComboBox1.DataField := 'name';
  DBComboBox1.Refresh;
end;

Answer 2

用combobox吧，写代码循环加进去就可以了就可以了

Answer 3

procedure TForm1.FormShow(Sender: TObject);
begin
  ADOQuery1.Close;
  ADOQuery1.Sql.Clear;
  ADOQuery1.SQL.Add('select * from tablename');
  ADOQuery1.Open;
  while not ADOQuery1.eof do
  begin
    ComboBox1.Items.Add(ADOQuery1.FIeldByName('Name').AsString)'
    ADOQuery1.Next;
  end;
end;

Answer 4

DBLookupComboBox的ListField绑定你要显示的字段即可

Answer 5

用combobox实现 ：
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select name from table');
adoquery1.open;
while not adoquery1.eof do
begin
  combobox1.items.add(adoquery1.fieldbyname('name').value);
  adoquery1.next;
end;