如何查看一个bpl的DESCRIPTION属性？

[mofaser]

我想实现的效果是在加载bpl（LoadPackage(bplName)）时能获取bpl的DESCRIPTION属性值。

一个bpl的project代码：

package GlobleDM;

{$R *.res}
{$ALIGN 8}
{$ASSERTIONS ON}
{$BOOLEVAL OFF}
{$DEBUGINFO ON}
{$EXTENDEDSYNTAX ON}
{$IMPORTEDDATA ON}
{$IOCHECKS ON}
{$LOCALSYMBOLS ON}
{$LONGSTRINGS ON}
{$OPENSTRINGS ON}
{$OPTIMIZATION ON}
{$OVERFLOWCHECKS OFF}
{$RANGECHECKS OFF}
{$REFERENCEINFO ON}
{$SAFEDIVIDE OFF}
{$STACKFRAMES OFF}
{$TYPEDADDRESS OFF}
{$VARSTRINGCHECKS ON}
{$WRITEABLECONST ON}
{$MINENUMSIZE 1}
{$IMAGEBASE $400000}
{$DESCRIPTION '公用数据库连接模块'} /////////////有什么函数可以获取这个信息么？
{$IMPLICITBUILD OFF}

requires
vcl,
vcldb,
bdertl,
adortl,
CodeSiteLoggingVcl,
Common,
rtl,
dbrtl;

contains
GlobleDMUtils in 'GlobleDMUtils.pas' {DM: TDataModule},
DBConnUtil in 'DBConnUtil.pas',
frmDeBugDlg in 'frmDeBugDlg.pas' {FmDeBugDlg},
frmDBProcess in 'frmDBProcess.pas';

end.