前段时间做了个关于PPT的插件开发，简单总结一下。
1. VC6.0中使用VBA 在VC6.0中，可以使用导入类型库功能，即可连接到所需的OLB文件，并且可以选择导入的类。然后可以直接声明对象，如_Application m_app。需要注意的是，导入的类只能是实体类，包含虚函数的类都无法包含进来。
2. VS2005中使用VBA
VS2005中，由于没有导入类型库功能，可以使用VC6.0中生成的.H文件，并连接到OLB文件。使用方法和VC6.0中基本相同。
3. VS2005中开发插件
VS2005中，可以直接利用Project Wizard来开发OFFICE插件程序。
生成的程序框架包含Connect.h，Connect.cpp,类CConnect中包含插件的加载事件处理函数。
需要导入文件：
1 #import "mso9.dll" rename_namespace("Office") \
2 rename("RGB","OfficeRGB") \
3 rename("DocumentProperties","OfficeDocumentProperties")
4 using namespace Office;
5 #import "VBE6EXT.olb" rename_namespace("VBE6")
6 using namespace VBE6;
7 #import "MSPPT9.OLB" named_guids,rename_namespace("MSPPT") \
8 rename("RGB","PPTRGB")
9 using namespace MSPPT;
VBA对象的使用和前两点有些不同，例如：
1 CComPtr<IDispatch> m_pApplication;
2 pApplication->QueryInterface(__uuidof(IDispatch), (LPVOID*)&m_pApplication);
3 MSPPT::_ApplicationPtr pApp;
4 m_pApplication->QueryInterface(__uuidof(MSPPT::_ApplicationPtr),(LPVOID*)&pApp);
该调用方法缺点是调用比较麻烦，但是优点是可以使用虚函数。例如_Application类中的get_HWND方法。
4. VS2005中开发插件－事件的加入
PPT中的提供的事件及注册消息号如下表（详细请参见MSDN文章
How to handle PowerPoint 2000 events or PowerPoint 2002 events by using Visual C++ .NET 2002 or Visual C++ .NET 2003 and Microsoft Foundation Classes）：
| DISPID |
Method
Name |
PowerPoint
2002 Only |
| 2001 |
WindowSelectionChange |
|
| 2002 |
WindowBeforeRightClick |
|
| 2003 |
WindowBeforeDoubleClick |
|
| 2004 |
PresentationClose |
|
| 2005 |
PresentationSave |
|
| 2006 |
PresentationOpen |
|
| 2007 |
NewPresentation |
|
| 2008 |
PresentationNewSlide |
|
| 2009 |
WindowActivate |
|
| 2010 |
WindowDeactivate |
|
| 2011 |
SlideShowBegin |
|
| 2012 |
SlideShowNextBuild |
|
| 2013 |
SlideShowNextSlide |
|
| 2014 |
SlideShowEnd |
|
| 2015 |
PresentationPrint |
|
| 2016 |
SlideSelectionChanged |
x |
| 2017 |
ColorSchemeChanged |
x |
| 2018 |
PresentationBeforeSave |
x |
| 2019 |
SlideShowNextClick |
x |
首先在OnConnection函数中连接到事件源(establish a connection with the event source represented by
pUnk)，如下：
1 pApplication->QueryInterface(__uuidof(IDispatch), (LPVOID*)&m_pApplication);
2 pAddInInst->QueryInterface(__uuidof(IDispatch), (LPVOID*)&m_pAddInInstance);
3 EApplicationEvents::DispEventAdvise(m_pApplication);
同样，OnDisconnection中断开事件的连接：
1 EApplicationEvents::DispEventUnadvise(m_pApplication)
注册事件函数，以PRESENTATIONOPEN事件为例，Connect.h中的代码如下：
1 _ATL_FUNC_INFO OnPresentationOpenInfo ={CC_STDCALL,VT_EMPTY,1,VT_DISPATCH};
2 #define PPTADDIN_PRESENTATIONOPEN 2006
3 class ATL_NO_VTABLE CConnect :
4 public CComObjectRootEx<CComSingleThreadModel>,
5 public CComCoClass<CConnect, &CLSID_Connect>,
6 public IDispatchImpl<AddInDesignerObjects::_IDTExtensibility2, &AddInDesignerObjects::IID__IDTExtensibility2, &AddInDesignerObjects::LIBID_AddInDesignerObjects, 1, 0>,
7 public IDispEventSimpleImpl<1,CConnect,&__uuidof(MSPPT::EApplication)>
8 {
9 public:
10 typedef IDispEventSimpleImpl<1,CConnect,&__uuidof(MSPPT::EApplication)> EApplicationEvents;
11 CConnect()
12 {
13 }
14
15 DECLARE_REGISTRY_RESOURCEID(IDR_ADDIN)
16 DECLARE_NOT_AGGREGATABLE(CConnect)
17
18 BEGIN_COM_MAP(CConnect)
19 COM_INTERFACE_ENTRY(IDispatch)
20 COM_INTERFACE_ENTRY(AddInDesignerObjects::IDTExtensibility2)
21 END_COM_MAP()
22
23 BEGIN_SINK_MAP(CConnect)
24 SINK_ENTRY_INFO(1, __uuidof(MSPPT::EApplication),/*dispid*/ 2006, OnPresentationOpen, &OnPresentationOpenInfo)
25
26 END_SINK_MAP()
27
28 DECLARE_PROTECT_FINAL_CONSTRUCT()
29
30 HRESULT FinalConstruct()
31 {
32 return S_OK;
33 }
34
35 void FinalRelease()
36 {
37 }
38
39 public:
40 //IDTExtensibility2 implementation:
41 STDMETHOD(OnConnection)(IDispatch * Application, AddInDesignerObjects::ext_ConnectMode ConnectMode, IDispatch *AddInInst, SAFEARRAY **custom);
42 STDMETHOD(OnDisconnection)(AddInDesignerObjects::ext_DisconnectMode RemoveMode, SAFEARRAY **custom );
43 STDMETHOD(OnAddInsUpdate)(SAFEARRAY **custom );
44 STDMETHOD(OnStartupComplete)(SAFEARRAY **custom );
45 STDMETHOD(OnBeginShutdown)(SAFEARRAY **custom );
46 private:
47 CComPtr<IDispatch> m_pApplication;
48 CComPtr<IDispatch> m_pAddInInstance;
49
50 protected:
51 typedef IDispEventSimpleImpl</*nID =*/ 1,CConnect, &__uuidof(MSPPT::EApplication)> ApplicationEvents;
52 void __stdcall OnPresentationOpen(IDispatch * pres);
53 };
Connect.cpp中添加OnPresentationOpen的源代码。
需要注意的是OnPresentationOpen函数的调用方式是__stdcall，否则编译会出错。