componentcount记录你的应用的Component的个数
其中GetPropValue是用来动态按名访问控件属性的函数，必须先uses TypInfo
此单元在HELP中并没有列出来，TypInfo单元提供了一组动态访问RTTI的函数
以下是一段程序，你可以试试，还有函数的书在 www.2ccc.com 上下载吧，最好的一本叫DELPHI5开发人员指南。
for i:=1 to ComponentCount-1 do
begin
try
Memo1.Lines.Add(GetPropValue(Components,'Caption'));
except
on EVariantError do ;
end;
end;
