怎样判断Access表主键? ( 积分: 100 )

在delphi中,用ADO控件,连接到Access表,用ADO的什么方法语句判断表的哪个字段为主键？找了好久都没找到,请大家帮帮忙,谢谢!

var
c : OleVariant;
t : OleVariant;
i : Integer;
j : Integer;
begin
c := CreateOleObject('ADOX.Catalog');
c.ActiveConnection := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:/My Documents/db1.mdb';
t := c.Tables['t1'];//表名
for i := 0 to t.Keys.Count - 1 do
if t.Keys.item.type = 1 then
for j := 0 to t.Keys.Item.Columns.Count - 1 do
mem.Lines.Add(t.Keys.Item.Columns.Item[j].Name);//主键字段,如果是联合主键,会有多个
end;

谢谢ysai,在您的指点下问题已解决,太感谢您了,给您加上积分!

谢谢ysai,在您的指点下问题已解决,太感谢您了,给您加上积分!