！！困扰我2个月的问题，高手关注！！

[noflybird]

在Access数据库中，如何知道某个表的哪几个字段被设成了主键？

问题太难，还可以加100分！！！

[flyingkiller]

access的参考资料太少，根本没有地方可以去找。

[noflybird]

var
keyField : array of string;
KeyCount : integer;
i , cc, st : integer;

IndexDefs := Table1.IndexDefs;
for i := 0 to IndexDefs.Count-1 do
begin
if IndexDefs.Items[i].Name ='PrimaryKey' then
//本段代码只对Access有效
//对SQL server 暂时嘿嘿....　形式
begin
keyFields := IndexDefs.Items[i].Fields;
cc := 1; keyCount := 0; st := 1;
while cc<=length(keyFields) do
begin
if keyfields[cc] = ';' then
begin
inc(keyCount);
keyField[keyCount] := copy(keyFields, st, cc-st);
st := cc + 1;
end;
inc(cc);
end;
inc(keyCount);
keyField[keyCount] := copy(keyFields, st, cc-st+1);
end;
end;


keyField中存放的就是所有主键字段

[wangluoxing]

我不是高手、我不知道的

[zwhhoo]

up

[shockjoy]

我真在研究，请继续关注！

[CDSoftwareWj]

用BDE可以得到字段类型信息，相关例子可以看看Delphi带的 SQL Explorer

[Elysium]

偶没使过access,扑通扑通～～～～