Word Add-in 函数调用顺序

这个图表明的函数的调用顺序，主要代码如下：

 // 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。