pt 

GetPropertyList (TControlPropertyStorage)