读取数据库字段信息怎么读?

[xiwanghope]

就是显示数据库自段的属性,比如子段名称,字段大小,类型等等

谢谢帮忙~~等待~~~~

[guorui_wh]

query1.Fields[i].AsString;//取值
query1.Fields[i].DataType;//数据类型
query1.Fields[i].DataSize;//数据宽度
query1.Fields[i].IsNull;//是否为null

[guorui_wh]

query1.Fields[i].FieldName;//字段名

[smilelhh]

看看TField的属性吧.
它都有.DisplayLabel,FieldName,DataSize,DataType

[xiwanghope]

我是要把这个显示在dbGird中，请问该怎么做呢？

谢谢。

[xiwanghope]

我找不到ｄａｔｅｓｉｚｅ这些属性，唉

[smilelhh]

a.open;
for i:=0 to a.FieldCount -1 do
begin
b.append;
b.FieldByName('name').asString:= a.Fields[i].FieldName;
b.FieldByName('label').asString:= a.Fields[i].DisplayLabel;
b.FieldByName('type').asString:= a.Fields[i].DataType;
b.FieldByName('size').asString:= IntToStr(a.Fields[i].DataSize);
b.Post;
end;
a.Close;

[xiwanghope]

我是用adoquery做查询，然后用adoquery.fields[i]....取值，但是根本看不到datatype这些属性，怎么办？谢谢

[XieHK]

很好做啊,你用ADO原型的OpenSchema 方法就可以得到你要的Recordset了,
记住哦,是ADO原型不是Delphi的ADOExpress组件

[xiwanghope]

不会～～：～～可怜～

[xiwanghope]

谢谢,我已经搞定了,不过问题是我读不出关键字是那一个,我是用OpenSchema 做的:)

[smilelhh]

to xiwanghope,
a,b 分别是一个dataset呀, 用adoquery也是一样的你就将a,b 分别换成你的源dataset和目的dataset就行了。

[xiwanghope]

sorry 我搞不定，想给自己做个数据库操作的工具，我delphi根本不会，哭，唉～

[smilelhh]

to : xiwanghope,
在前面再加一条：
if not a.active then a.open;
if not b.active then b.open;