请问怎样将一个表的字段名全部传给combobox组件？？

Question

我想用combobox组件来取得数据表的全部字段名，请问各位应该怎么做啊？ 谢谢！

Answer 1

combobox1.Items.Add(query1.FieldDefs.Items[i].Name);
combobox1.Items.Add(query1.Fields[i].FileName);为什么这两语句都不正确呢，它老提示“List index out of bounds(2)” 是怎么回事，高手们帮帮我！！ 谢谢！

Answer 2

for i:= 0 to Table1.FieldCount-1 do
    begin
        ComboBox1.Items.Add(Table1.Fields[i].DisplayName);
    end;

Answer 3

table1.getfieldnames(combobox1.items);

Answer 4

table1.open
combobox1.items.clear
while not table1.eof do
begin
  combobox1.items.add(table1.fieldbyname('字段名称').asstring;
  next;
end;