TInterfaceList
TInterfacedObject
TObject