TStreamAdapter
TInterfacedObject
TObject