delphi如何获得ACCESS表中字段的名称

Question

delphi如何获得ACCESS表中字段的名称（给代码）谢谢

Answer 1

太简单了,用fieldname就可以了.

Answer 2

楼主高人procedure TMainForm.Button5Click(Sender: TObject);
var
  I: Integer;
begin
  for I := 0 to ADOQuery1.Fields.Count - 1 do
  begin
    ShowMessage(ADOQuery1.Fields[I].FieldName);
  end;
end;

Answer 3

楼主是想一次获得一个表的所有字段？可以用这个啊。
procedure TForm3.Button1Click(Sender: TObject);
begin
  ADOQuery1.Open;
  ADOQuery1.GetFieldNames(ComboBox1.Items);
end;
这样ComboBox1里就会有这个表里所有的字段名。

Answer 4

GetFieldNames();参数是Tstrings，不用ComboBox1的话，可以定义一个Tstrings的变量，其他地方用的时候从变量里取就行了

Answer 5

GetFieldNames 这个更为简单实用