TControlPropertyStorage
pt
GetPropertyList