delphi RTTI 四 获取类属性列表

delphi RTTI 四 获取类属性列表

GetPropList(btn1.ClassInfo, tkAny, PropList)

  PropCount := GetTypeData(btn1.ClassInfo).PropCount;