Delphi:

public TObjectGuardList = class(TInterfacedObject, IObjectGuardList);

C++:

public: class TObjectGuardList : public TInterfacedObject, public IObjectGuardList;