怎样把一个表一栏里的内容加入到combobox里?解决就给分!

Question

如题
把一个表的'姓名'栏里的内容加入到combobox里?
解决就给分!

Answer 1

table1.First;
comboBox1.Items.Clear;
while not table1.Eof do
begin
  comboBox1.Items.Add(table1.FieldByName('姓名').AsString);
  table1.Next;
end;

Answer 2

comboBox1.Items.Add(table1.FieldByName('YourFieldName').AsString);

Answer 3

table1.First;
comboBox1.Items.Clear;
while not table1.Eof do
begin
  comboBox1.Items.Add(table1.FieldByName('姓名').AsString);
  table1.Next;
end;

Answer 4

table1.First;
comboBox1.Items.Clear;
while not table1.Eof do
begin
  comboBox1.Items.Add(table1.FieldByName('姓名').AsString);
  table1.Next;
end;

Answer 5

使用表记录的循环,依次添加到combobox中,同意楼上

Answer 6

楼上的都可以，你还可以用lookupcombobox，可以直接显示一列的字段

Answer 7

table1.First;
comboBox1.Items.Clear;
while not table1.Eof do
begin
  comboBox1.Items.Add(table1['姓名'].value);
  table1.Next;
end;
楼上都写的很对怎么不给分？？

Answer 8

mytable.First;
comboBox1.Clear;
while not mytable.Eof do
begin
  comboBox1.AddItem(mytable.FieldByName('姓名').AsString,nil);
  mytable.Next;
end;

Answer 9

with adoquery1 do
begin  sql.clear;
  sql.add('select 姓名　from 表名 ');
  open;
end;
  
  for i:=1 do adoquery1.recordcount do
  begin
    if combobox1.Items.IndexOf(adoquery1.FieldValues['姓名'])=-1 then
    combobox1.Items.Add(adoquery1.FieldValues['姓名'] ;//如果有重名的则不添加到　　　　　　　　　　　　　　　　　　　　　　　　　　　　//combobox1中
    adoquery1.next;
 end;

Answer 10

ADOTable1.Open;
ADOTable1.First;
comboBox1.Items.Clear;
while not ADOTable1.Eof do
begin
  comboBox1.Items.Add(ADOTable1.FieldByName('姓名').AsString);
  ADOTable1.Next;
end;
ADOTable1.Close;

Answer 11

如果你想不写代码就用DBLOOKUPCOMBOBOX吧,如果想写的话上面写得很详细