TInterfacedPersistent

pt 

_AddRef

pt 

_Release

QueryInterface

AfterConstruction

TPersistent

pt 

AssignTo

pt 

DefineProperties

pt 

GetOwner

Destroy

Assign

GetNamePath