I>class TDataObject : public IDataObject;

I>HRESULT TDataObject::GetData(FORMATETC* pFormatetc, STGMEDIUM* pmedium)
I>{
I> // ...
I> pmedium->tymed = TYMED_HGLOBAL;
I> pmedium->hGlobal = ::GlobalAlloc(GHND, nSize);
I> pmedium->pUnkForRelease = new TUnknownForRelease(pmedium->hGlobal);
pmedium->pUnkForRelease->AddRef(); // Копируем "на верх", а значит должны увеличить кол-во ссылок
I> // ...
I>}
I>