delphi中能不能实现获取数据库表中的字段名？？？

[hbwjz]

delphi中能不能实现获取数据库表中的字段名。就是说获取数据库中一个表的所有字段的名称，注：不是表里的数据

[lqxmm]

select * from syscolumns where ...

[楚人无衣]

for i := 0 to ADOQuery1.Fields[i] - 1 do
ADOQuery1.Fields[i]-->ADOQuery1.FieldCount，
ADOQuery1.Fields[i]-->ADOQuery1.Fields.Count，
呵呵，这样的错误我都写过去了……

[楚人无衣]

可以啊，假若ADOQuery1为查询某个表的所有字段：
var
i: Integer;
begin
for i := 0 to ADOQuery1.Fields[i] - 1 do
Memo1.Lines.Add(ADOQuery1.Fields[i].FieldName);
end;

[hbwjz]

好，好几年没用D，都快忘光了

[fantasywxx]

Adoconnection1.GetFieldNames(tablename,strlistfields);其中tablename是你要获取字段名称的表，strlistfields是自定义的一个Tstringlist变量。执行后字段名称存放在strlistfields中了。