if (SUCCEEDED(hr))
{
// Unregister this category as being "implemented" by the class.
CATID rgcatid[2] ;
rgcatid[0] = CATID_SafeForInitializing;
rgcatid[1] = CATID_SafeForScripting;
hr = pcr->UnRegisterClassImplCategories(_tlid, 1, rgcatid);
}
if (pcr != NULL)
pcr->Release();
if (!AfxOleUnregisterTypeLib(_tlid, _wVerMajor, _wVerMinor))
return ResultFromScode(SELFREG_E_TYPELIB);
if (!COleObjectFactoryEx::UpdateRegistryAll(FALSE))
return ResultFromScode(SELFREG_E_CLASS);