//Implementation of IUnknown methods for singletons - no reference counting
#define IUNKNOWN_METHODS_IMPLEMENTATION_REFERENCE()    \
   virtual HRESULT __stdcall QueryInterface(REFIID riid, void** ppv)                  \
    {                                                                                 \
     if (riid == IID_IUnknown)                                                        \
      {                                                                               \
       *ppv = this;                                                                   \
       return S_OK;                                                                   \
      }                                                                               \
       else                                                                           \
     if (riid.Data1 == (unsigned long)ID && riid.Data2 == 0 && riid.Data3 ==0 &&      \
         riid.Data4[0] == 0 && riid.Data4[1] == 0 &&                                  \
         riid.Data4[2] == 0 && riid.Data4[3] == 0 &&                                  \
         riid.Data4[4] == 0 && riid.Data4[5] == 0 &&                                  \
         riid.Data4[6] == 0 && riid.Data4[7] == 0)                                    \
          {                                                                           \
           *ppv = this;                                                               \
           return S_OK;                                                               \
          }                                                                           \
       else                                                                           \
     {                                                                                \
     *ppv=NULL;                                                                       \
     return E_NOINTERFACE;                                                            \
     }                                                                                \
    };                                                                                \
  virtual ULONG __stdcall AddRef() {return 1;};  \
  virtual ULONG __stdcall Release() {return 1;};

Это же правило действует при присваивании указателям на интерфейсы, переданным в функцию по var. 
5.	При создании переменной-указателя на интерфейс, ей автоматически присваивается значение nil. 
6.	Присваивание указателю на интерфейс значения nil вызывается Release() на освобождаемом интерфейсе(если он не-nil): 
7.	iptr1: ISomeInteface;
iptr1:=nil; //вызывает Release() на iptr1
8.	Если указатель на интерфейс выходит из области видимости, завершающий код проверят значение указателя, и если он не равен nil, вызывает Release(): 
9.	procedure myFunc();
10.	var
11.	 iptr: ISomeInterface;
12.	begin
13.	 iptr:=…
14.	 …
end;  //здесь неявно вызывается Release()
15.	При присваивании структур, членами которых являются указатели на интерфейсы, на каждом не-nil интерфейсе вызываются Release()/AddRef(). При выходе из зоны видимости структуры, членами которой являются указатели на интерфейсы, на каждом не-nil интерфейсе вызывается Release(). 
16.	При передаче указателя на интерфейс в качестве параметра в функцию по значению, на интерфейсе вызывается AddRef(), при передаче по ссылке - нет: 
17.	procedure MyFunc1(ptr :ISomeInterface);  //Вызвает AddRef() на входе в функцию,
 Release() на выходе
18.	procedure MyFunc2(var ptr: ISomeInterface); //не вызывает AddRef()/Release()
procedure MyFunc3(const ptr: ISomeInterface); //не вызывает AddRef()/Release()
Если функция возвращает указатель на интерфейс, то AddRef() вызывается один раз:

function GetInterface():ISomeInterface;
begin
 result:=TSomenterfaceImplementator.Create ();  //вызывает AddRef(), refount=2
  //предполагается, что TSomenterfaceImplementator.Create () создает объект с начальным 
значением счетчика ссылок, равным 1
end;

var
 iptr: ISomeInterface;
begin
 iptr:=GetInterface(); //AddRef() не вызывается, refcount=2
end;

Пример 2: 
Var
Iptr1 : ISomeInterface;
iptr2: ISomeInterface;

iptr1:=iptr2;  //вызывает iptr1.Release() и iptr2.AddRef();
pointer(iptr1):=pointer(iptr2);  //не вызывает ничего
Использование обычных указателей лично мне видится более простым. 
Единственное, что хочу заметить: если не используется подсчет ссылок, то при удалении объектов, реализующих интерфейс, нужно соблюдать осторожность - необходимо явно обнулить все указатели на интерфейс, чтобы компилятор не вызвал Release() на уничтоженном объекте. 
Пример: 
var
iptr : ISomeInterface;
i: integer;
begin
 for i:=0 to Manager.ObjectsCount()-1 do
   begin
     pointer(iptr):=Manager.GetObject(i);
     if iptr.Selected()=true then
        begin
          Manager.DeleteObject(i);
          //обязательно обнулить указатель, иначе при выходе из функции будет
 вызван Release() на уничтоженном объекте.
          pointer(iptr):=nil;
          break;
        end;
    end;
end;

Для того, чтобы код мог правильно получить указатель на такой объект, необходимо, чтобы реализация метода QueryInterface() корректно возвращала указатели на интерфейсы IUnknown и запрашиваемый интерфейс - см. реализацию метода QueryInterface() - макрос IUNKNOWN_METHODS_ IMPLEMENTATION_REFERENCE(), приведенный выше. 
Поскольку DLL содержит .net код, менеджер плагинов не может напрямую вызывать функции DLV_Init(), DLV_Close() и DLV_GetInterface(). Описав их как extern "C"__declspec(dllexport), мы заставляем компилятор создать native-код для вызова .net функций из native кода: 
extern "C" __declspec(dllexport) 
void DLV_Init() 
{
…
}

public static class iCanvas
 {
  public static uint ID = 0x83893202;
  public static uint VERSION = 0x00010000;
 };
Те же правила действуют и при получении CCW/RCW. 
Кроме этого, нужно знать еще несколько правил: 
1.	В .net используется сборщик мусора. Он может перемещать объекты в памяти. Поэтому в native код можно передавать только те указатели, которые указывают на объекты, специально созданные в неперемещаемой памяти: 
2.	private IntPtr name;
3.	
4.	name = System.Runtime.InteropServices.Marshal.StringToHGlobalAnsi("Diamond, implemented
 in C# plugin");
5.	
6.	public void GetDesc(out IntPtr desc)
7.	{
8.	 desc = name;
}
9.	Сборщик мусора уничтожает объект только в момент сборки мусора. Это значит, что объект может "жить" еще очень долго после момента, когда счетчик ссылок достиг 0. Если объект использует какие-то ресурсы, то необходимо предусмотреть метод, который вызывает их освобождение, так как деструктор объекта не будет вызван в момент освобождения объекта по Release(). 
10.	При закрытии плагина необходимо вызвать методы:
GC.Collect();
GC.WaitForPendingFinalizers();

чтобы корректно отработали деструкторы всех объектов (поэтому проблема, которая упоминается к комментариям к статье, на самом деле не существует). 
В книге очень подробно описаны различные примеры взаимодействия managed и native кода.