这个图表明的函数的调用顺序，主要代码如下：
// MyAddin.cpp : Implementation of DLL Exports. // Note: Proxy/Stub Information
// To merge the proxy/stub code into the object DLL, add the file
// dlldatax.c to the project. Make sure precompiled headers
// are turned off for this file, and add _MERGE_PROXYSTUB to the
// defines for the project.
//
// If you are not running WinNT4.0 or Win95 with DCOM, then you
// need to remove the following define from dlldatax.c
// #define _WIN32_WINNT 0x0400
//
// Further, if you are running MIDL without /Oicf switch, you also
// need to remove the following define from dlldatax.c.
// #define USE_STUBLESS_PROXY
//
// Modify the custom build rule for MyAddin.idl by adding the following
// files to the Outputs.
// MyAddin_p.c
// dlldata.c
// To build a separate proxy/stub DLL,
// run nmake -f MyAddinps.mk in the project directory. #include "stdafx.h"
#include "resource.h"
#include <initguid.h>
#include "MyAddin.h"
#include "dlldatax.h" #include "MyAddin_i.c"
#include "WordAddin.h" #ifdef _MERGE_PROXYSTUB
extern "C" HINSTANCE hProxyDll;
#endif CComModule _Module; BEGIN_OBJECT_MAP(ObjectMap)
OBJECT_ENTRY(CLSID_WordAddin, CWordAddin)
END_OBJECT_MAP() /////////////////////////////////////////////////////////////////////////////
// DLL Entry Point extern "C"
BOOL WINAPI DllMain(HINSTANCE hInstance, DWORD dwReason, LPVOID lpReserved)
{
MessageBox(NULL,"DllMain",NULL,MB_OK);
lpReserved;
#ifdef _MERGE_PROXYSTUB
if (!PrxDllMain(hInstance, dwReason, lpReserved))
return FALSE;
#endif
if (dwReason == DLL_PROCESS_ATTACH)
{
_Module.Init(ObjectMap, hInstance, &LIBID_MYADDINLib);
DisableThreadLibraryCalls(hInstance);
}
else if (dwReason == DLL_PROCESS_DETACH)
_Module.Term();
return TRUE; // ok
} /////////////////////////////////////////////////////////////////////////////
// Used to determine whether the DLL can be unloaded by OLE STDAPI DllCanUnloadNow(void)
{
MessageBox(NULL,"DllCanUnloadNow",NULL,MB_OK);
#ifdef _MERGE_PROXYSTUB
if (PrxDllCanUnloadNow() != S_OK)
return S_FALSE;
#endif
return (_Module.GetLockCount()==) ? S_OK : S_FALSE;
} /////////////////////////////////////////////////////////////////////////////
// Returns a class factory to create an object of the requested type STDAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID* ppv)
{
MessageBox(NULL,"DllGetClassObject",NULL,MB_OK);
#ifdef _MERGE_PROXYSTUB
if (PrxDllGetClassObject(rclsid, riid, ppv) == S_OK)
return S_OK;
#endif return _Module.GetClassObject(rclsid, riid, ppv);
} /////////////////////////////////////////////////////////////////////////////
// DllRegisterServer - Adds entries to the system registry STDAPI DllRegisterServer(void)
{
MessageBox(NULL,"DllRegisterServer",NULL,MB_OK);
#ifdef _MERGE_PROXYSTUB
HRESULT hRes = PrxDllRegisterServer();
if (FAILED(hRes))
return hRes;
#endif
// registers object, typelib and all interfaces in typelib return _Module.RegisterServer(TRUE);
} /////////////////////////////////////////////////////////////////////////////
// DllUnregisterServer - Removes entries from the system registry STDAPI DllUnregisterServer(void)
{
MessageBox(NULL,"DllUnregisterServer",NULL,MB_OK);
#ifdef _MERGE_PROXYSTUB
PrxDllUnregisterServer();
#endif return _Module.UnregisterServer(TRUE);
}
还有一份代码如下：
// WordAddin.h : Declaration of the CWordAddin #ifndef __WORDADDIN_H_
#define __WORDADDIN_H_ #include "resource.h" // main symbols
#include "stdafx.h"
#include "StdAfx.h"
#import "C:\Program Files\Common Files\designer\MSADDNDR.dll" raw_interfaces_only, raw_native_types, no_namespace, named_guids extern _ATL_FUNC_INFO OnClickButtonInfo; /////////////////////////////////////////////////////////////////////////////
// CWordAddin
class ATL_NO_VTABLE CWordAddin :
public CComObjectRootEx<CComSingleThreadModel>,
public CComCoClass<CWordAddin, &CLSID_WordAddin>,
public IDispatchImpl<IWordAddin, &IID_IWordAddin, &LIBID_MYADDINLib>,
public IDispatchImpl<_IDTExtensibility2, &IID__IDTExtensibility2, &LIBID_AddInDesignerObjects>,
public IDispEventSimpleImpl<,CWordAddin,&__uuidof(Office::_CommandBarButtonEvents)>,
public IDispatchImpl<IRibbonExtensibility, &IID_IRibbonExtensibility, &LIBID_Office>
{
public:
CWordAddin()
{
int i = ;
} DECLARE_REGISTRY_RESOURCEID(IDR_WORDADDIN) DECLARE_PROTECT_FINAL_CONSTRUCT() BEGIN_COM_MAP(CWordAddin)
COM_INTERFACE_ENTRY(IWordAddin)
//DEL COM_INTERFACE_ENTRY(IDispatch)
COM_INTERFACE_ENTRY2(IDispatch, IWordAddin)
COM_INTERFACE_ENTRY(_IDTExtensibility2)
COM_INTERFACE_ENTRY(IRibbonExtensibility)
END_COM_MAP() BEGIN_SINK_MAP(CWordAddin)
SINK_ENTRY_INFO(, __uuidof(Office::_CommandBarButtonEvents),/*dispid*/ 0x01, OnClickButton1, &OnClickButtonInfo)
END_SINK_MAP() // IWordAddin
public:
STDMETHOD(OnMyButton)(/*[in]*/IDispatch* pIDispControl);
CComQIPtr <Word::_Application> m_spApp;
CComPtr < Office::_CommandBarButton> m_spCmdButton;
typedef IDispEventSimpleImpl</*nID =*/ ,CWordAddin, &__uuidof(Office::_CommandBarButtonEvents)> CommandButton1Events;
// _IDTExtensibility2
STDMETHOD(OnConnection)(IDispatch * Application, ext_ConnectMode ConnectMode, IDispatch * AddInInst, SAFEARRAY * * custom)
{
::MessageBox(NULL,"OnConnection","",MB_OK);
OutputDebugString("OnConnection");
//Delete it for the Office 2007 CComPtr < Office::_CommandBars> spCmdBars;
CComQIPtr <Word::_Application> spApp(Application);
m_spApp = spApp;
ATLASSERT(spApp); HRESULT hr = spApp->get_CommandBars(&spCmdBars);
if(FAILED(hr))
return hr; ATLASSERT(spCmdBars); CComVariant vName("MyAddin");
CComPtr <Office::CommandBar> spNewCmdBar;
CComVariant vPos();
CComVariant vTemp(VARIANT_TRUE);
CComVariant vEmpty(DISP_E_PARAMNOTFOUND, VT_ERROR);
spNewCmdBar = spCmdBars->Add(vName, vPos, vEmpty, vTemp); CComPtr < Office::CommandBarControls> spBarControls;
spBarControls = spNewCmdBar->GetControls();
ATLASSERT(spBarControls); CComVariant vToolBarType();
CComVariant vShow(VARIANT_TRUE);
CComPtr < Office::CommandBarControl> spNewBar;
spNewBar = spBarControls->Add(vToolBarType, vEmpty, vEmpty, vEmpty, vShow);
ATLASSERT(spNewBar); CComQIPtr < Office::_CommandBarButton> spCmdButton(spNewBar);
ATLASSERT(spCmdButton); HBITMAP hBmp =(HBITMAP)::LoadImage(_Module.GetResourceInstance(),
MAKEINTRESOURCE(IDB_BITMAP),IMAGE_BITMAP,,,LR_LOADMAP3DCOLORS); ::OpenClipboard(NULL);
::EmptyClipboard();
::SetClipboardData(CF_BITMAP, (HANDLE)hBmp);
::CloseClipboard();
::DeleteObject(hBmp); spCmdButton->PutStyle(Office::msoButtonIconAndCaption);
hr = spCmdButton->PasteFace();
if (FAILED(hr))
return hr; spCmdButton->PutVisible(VARIANT_TRUE);
spCmdButton->PutCaption(OLESTR("myAddin"));
spCmdButton->PutEnabled(VARIANT_TRUE);
spCmdButton->PutTooltipText(OLESTR("test1"));
spCmdButton->PutTag(OLESTR("test1")); spNewCmdBar->PutVisible(VARIANT_TRUE); m_spCmdButton = spCmdButton; CommandButton1Events::DispEventAdvise((IDispatch*)m_spCmdButton);
return S_OK;
}
STDMETHOD(OnDisconnection)(ext_DisconnectMode RemoveMode, SAFEARRAY * * custom)
{
MessageBox(NULL,"OnDisconnection",NULL,MB_OK);
if(m_spCmdButton != NULL)
CommandButton1Events::DispEventUnadvise((IDispatch*)m_spCmdButton);
return S_OK;
}
STDMETHOD(OnAddInsUpdate)(SAFEARRAY * * custom)
{
MessageBox(NULL,"OnAddInsUpdate",NULL,MB_OK);
return S_OK;
}
STDMETHOD(OnStartupComplete)(SAFEARRAY * * custom)
{
MessageBox(NULL,"OnStartupComplete",NULL,MB_OK);
return S_OK;
}
STDMETHOD(OnBeginShutdown)(SAFEARRAY * * custom)
{
MessageBox(NULL,"OnBeginShutdown",NULL,MB_OK);
return S_OK;
} void __stdcall OnClickButton1(IDispatch * /*Office::_CommandBarButton**/ Ctrl,VARIANT_BOOL * CancelDefault); // IRibbonExtensibility
STDMETHOD(raw_GetCustomUI)(BSTR RibbonID, BSTR * RibbonXml)
{
MessageBox(NULL,"raw_GetCustomUI",NULL,MB_OK);
OutputDebugString("raw_GetCustomUI");
char szRibbon[MAX_PATH*] = {0x00};
LoadString(_Module.GetModuleInstance(),IDS_RIBBON_XML, \
szRibbon, MAX_PATH*);
if (RibbonXml == NULL)
return E_POINTER; OutputDebugString(szRibbon); CComBSTR bstr(szRibbon);
bstr.CopyTo(RibbonXml);//use this to avoid heap destroy
bstr.Empty();
return S_OK;
}
}; #endif //__WORDADDIN_H_
这是两个主要的文件。
注意两个问题：
160 CComBSTR bstr(szRibbon);
161 bstr.CopyTo(RibbonXml);//use this to avoid heap destroy
162 bstr.Empty();
这三行代码是为了防止程序退出时，插件对word的内存进行修改，导致堆错误，Word会Crash。函数的含义请参考MSDN。