zeoslib:取得数据库中某张表的主关键字

    环境：firebird2.5，zeos7.0，lazarus1.1，fpc2.6.1。

    如何取得数据库中某tb1表的主关键字？

    在form中放入ZSQLMetadata控件，使用以下代码取得主关键字：

    

  ZSQLMetadata1.Close;
  ZSQLMetadata1.TableName:=tableName;
  ZSQLMetadata1.MetadataType := mdPrimaryKeys;
  ZSQLMetadata1.Open;
  strPK:= ZSQLMetadata1.FieldByName('COLUMN_NAME').AsString; 

    （2014.2.10）