CREATE TABLE [pbBillType] (
[BillTypeID] [int] NOT NULL ,
[sBillType] [varchar] (20) COLLATE Chinese_PRC_CI_AS NOT NULL ,
[bIsAudit] [bit] NOT NULL ,
[ModuleID] [int] NOT NULL ,
CONSTRAINT [PK_pbBillType] PRIMARY KEY  CLUSTERED 
(
[BillTypeID]
) WITH  FILLFACTOR = 90  ON [PRIMARY] 
) ON [PRIMARY]
GOpbBillType这个表BillTypeID是关键字段,sBillType和ModuleID都是不允许重复的唯一约束,打开这个表的时候:
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('select * from pbBillType');
adoquery1.open;
然后我想做2个函数:
function FindPrimaryFieldName(aq:TADOQuery):string; //查找关键字段
begin
   result:= aq.xxxx.xxxx   //怎么写?
end;
function FindPrimaryFieldName(aq:TADOQuery):string; //查找唯一约束
begin
   result:= aq.xxxx.xxxx   //怎么写?
end;