TInterfacedObject

TObject