STDAPI DllUnregisterServer()
{
RegisterComCat(CLSID_WorkraveDeskBand, CATID_DeskBand, FALSE);
RegisterServer(CLSID_WorkraveDeskBand, TEXT("Workrave"), FALSE);
ClearDeskBandCache();
return S_OK;
}
/////////////////////////////////////////////////////////////////////////////
// DllRegisterServer - Adds entries to the system registry
STDAPI DllRegisterServer(void)
{
// registers object, typelib and all interfaces in typelib
HRESULT hr = _Module.RegisterServer(true);
// Register the vertical explorer bar object.
if(!RegisterBand(CLSID_JMEXPLORERBAND_STRING, _T("&Creata Mail")))
return SELFREG_E_CLASS;
// Register the component categories for the explorer bar object.
if(!RegisterComCat(CLSID_JMExplorerBand, CATID_InfoBand))
return SELFREG_E_CLASS;
// Register BHO
if(!RegisterBHO(CLSID_BROWSERHELPEROBJ_STRING, g_szAppName))
return SELFREG_E_CLASS;
// Register IE icon button
if(!RegisterIEButton(CLSID_JMEXPLORERBAND_STRING, g_szAppName))
return SELFREG_E_CLASS;
// Currenly toolband is not used, so we need to check to see
// if it was registered by previous versions. If so, we unregister.
if (IsToolbandRegistered(CLSID_JMTOOLBAND_STRING))
UnregisterToolBand(CLSID_JMTOOLBAND_STRING);
// Register the tool band object. -- currently not used - JHC
/* if(!RegisterToolBand(CLSID_JMTOOLBAND_STRING, g_szAppName))
return SELFREG_E_CLASS;*/
return hr;
}
STDAPI DllRegisterServer()
{
//Register the desk band object.
if (!RegisterServer(CLSID_WorkraveDeskBand, TEXT("Workrave"), TRUE))
return SELFREG_E_CLASS;
//Register the component categories for the desk band object.
if (!RegisterComCat(CLSID_WorkraveDeskBand, CATID_DeskBand, TRUE))
return SELFREG_E_CLASS;
ClearDeskBandCache();
return S_OK;
}
UINT WINAPI EnableClients(DWORD dwClientType)
{
HRESULT hr = S_OK;
BOOL bExpressRegOK = true;
BOOL bOutlookRegOK = true;
BOOL bIERegOK = true;
BOOL bAOLRegOK = true;
if (dwClientType & CLIENT_TYPE_EXPRESS)
{
hr = _Module.RegisterServer(true, &CLSID_OEAddin);
bExpressRegOK = SUCCEEDED(hr);
}
if (dwClientType & CLIENT_TYPE_OUTLOOK)
{
hr = _Module.RegisterServer(true, &CLSID_MsAddIn);
bOutlookRegOK = SUCCEEDED(hr);
}
// Temp, Until AOL supported - JHC
/*if (dwClientType & CLIENT_TYPE_AOL)
{
hr = _Module.RegisterServer(true, &CLSID_AOLAddin);
bAOLRegOK = SUCCEEDED(hr);
}*/
if (dwClientType & CLIENT_TYPE_IE)
{
BOOL bBandRegOK = RegisterBand(CLSID_JMEXPLORERBAND_STRING, _T("&Creata Mail"));
BOOL bComCatRegOK = RegisterComCat(CLSID_JMExplorerBand, CATID_InfoBand);
BOOL bBHORegOK = RegisterBHO(CLSID_BROWSERHELPEROBJ_STRING, g_szAppName);
BOOL bIEButtonRegOK = RegisterIEButton(CLSID_JMEXPLORERBAND_STRING, g_szAppName);
bIERegOK = bBandRegOK && bComCatRegOK && bBHORegOK && bIEButtonRegOK;
_Module.RegisterServer(true, &CLSID_JMExplorerBand);
}
return (bExpressRegOK && bOutlookRegOK && bIERegOK && bAOLRegOK);
}
STDAPI DllRegisterServer(void)
{
//Register the desk band object.
if(!RegisterServer(CLSID_SampleDeskBand, TEXT("Sample &Desk Band")))
return SELFREG_E_CLASS;
//Register the component categories for the desk band object.
if(!RegisterComCat(CLSID_SampleDeskBand, CATID_DeskBand))
return SELFREG_E_CLASS;
//Register the explorer bar object.
if(!RegisterServer(CLSID_SampleExplorerBar, TEXT("Sample &Explorer Bar")))
return SELFREG_E_CLASS;
//Register the component categories for the explorer bar object.
if(!RegisterComCat(CLSID_SampleExplorerBar, CATID_InfoBand))
return SELFREG_E_CLASS;
//Register the comm band object.
if(!RegisterServer(CLSID_SampleCommBand, TEXT("Sample &Comm Band")))
return SELFREG_E_CLASS;
//Register the component categories for the comm band object.
if(!RegisterComCat(CLSID_SampleCommBand, CATID_CommBand))
return SELFREG_E_CLASS;
//Register the tool band object.
if(!RegisterServer(CLSID_SampleToolBand, TEXT("Sample &Tool Band")))
return SELFREG_E_CLASS;
//Register the tool band object.
if(!RegisterToolBand(CLSID_SampleToolBand))
return SELFREG_E_CLASS;
/*
Remove the cache of the deskbands on Windows 2000. This will cause the new
deskband to be displayed in the toolbar menu the next time the user brings it
up. See KB article Q214842 for more information on this.
*/
TCHAR szSubKey[MAX_PATH];
TCHAR szCATID[MAX_PATH];
LPWSTR pwszCATID;
StringFromCLSID(CATID_DeskBand, &pwszCATID);
if(pwszCATID)
{
#ifdef UNICODE
lstrcpyn(szCATID, pwszCATID, ARRAYSIZE(szCATID));
#else
WideCharToMultiByte( CP_ACP,
0,
pwszCATID,
-1,
szCATID,
ARRAYSIZE(szCATID),
NULL,
NULL);
#endif
//free the string
CoTaskMemFree(pwszCATID);
wsprintf(szSubKey, TEXT("Component Categories\\%s\\Enum"), szCATID);
RegDeleteKey(HKEY_CLASSES_ROOT, szSubKey);
}
return S_OK;
}
