使用C++实现SDK之WebBrowser容器

转自http://blog.csdn.net/norsd/article/details/2921389

一.由来

我还记还得当自认为学习完了C++语法后, 兴致勃勃的打开MFC向导,开始所谓"MFC高级自动化编程"时, 我不由喊道: 这他妈的都是些什么乱七八糟的东西啊.诚然,MFC为了方便愚蠢的程序员,的确是让人瞬间高级编程, 可是愚蠢的我们还是会用CString strTest;写出(PWSTR)strTest.GetBuffer() 这种自作聪明的用法,结果就是整个程序好像发了疯.

终于有一天,我大喊一声: 滚蛋吧,MFC!

太阳当空照,上帝对 我笑: 你Y去写个有WebBrowser控件的窗口吧

二.结构

MFC的HTMLDialog 是一个魔盒, 他容易上手,可是却很难深入,究其缘由, 私以为无外乎MFC包装的太好, 不识庐山真面目,只缘身在此山中. 总是以为作为C类型的程序员,喜欢深入原理是职业特性.

于是首先看到有强人写的纯C实现WebBrowser控件,他在这里: http://www.codeproject.com/KB/COM/cwebpage.aspx 这位同志很好的展示了在没有C++的支持下,支持ActiveX是多么痛苦的一件事情...........汗. 在下觉得,撇开C++的类的特性,虚拟特性,重载特性,而去用纯C实现,实在有点过犹不及,当然这种练习修炼内功很好,但是实际应用上显得麻烦.毕竟,ActiveX很好的使用了C++的特性,而不是C的特性.

接着,开始使用纯SDK编写容器. 读者可以搜索csdn中关于SDK实现WebBrowser容器的帖子, 许多人说那是非常繁琐复杂.所谓人云亦云,各位看官不妨跟着我一试,且看到底何如?

WebBrowser容器的实现需要许多接口, 也许正是这吓退了许多人, 实际情况是,许多接口的方法没几个需要实现,大部分只需要直接返回E_NOTIMPL和S_OK, E_FAIL.

让我们命名我们编写的容器叫 WebBrowser (可能名字有点糊涂,但是因为源代码中就是这个名字,所以就不改了,大家只需要注意,这个是一个WebBrowser控件的容器 ), 在实现这个容器后, 我们把他作为一个窗口类的父类,这样 就能实现WebBrowser的页面窗口.

首先一个WB( WebBrowser) 容器需要以下接口:

  1. public IDispatch
  2. public IOleClientSite
  3. public IOleInPlaceSite
  4. public IOleInPlaceFrame
每个接口需要实现的方法分别是:
  1. // IUnknown methods
  2. virtual STDMETHODIMP QueryInterface(REFIID iid,void**ppvObject);
  3. virtual STDMETHODIMP_(ULONG) AddRef();
  4. virtual STDMETHODIMP_(ULONG) Release();
  5. // IDispatch Methods
  6. HRESULT _stdcall GetTypeInfoCount(unsigned int * pctinfo);
  7. HRESULT _stdcall GetTypeInfo(unsigned int iTInfo,LCID lcid,ITypeInfo FAR* FAR* ppTInfo);
  8. HRESULT _stdcall GetIDsOfNames(REFIID riid,OLECHAR FAR* FAR* rgszNames,unsigned int cNames,LCID lcid,DISPID FAR* rgDispId);
  9. HRESULT _stdcall Invoke(DISPID dispIdMember,REFIID riid,LCID lcid,WORD wFlags,DISPPARAMS FAR* pDispParams,VARIANT FAR* pVarResult,EXCEPINFO FAR* pExcepInfo,unsigned int FAR* puArgErr);
  10. // IOleClientSite methods
  11. virtual STDMETHODIMP SaveObject();
  12. virtual STDMETHODIMP GetMoniker(DWORD dwA,DWORD dwW,IMoniker**pm);
  13. virtual STDMETHODIMP GetContainer(IOleContainer**pc);
  14. virtual STDMETHODIMP ShowObject();
  15. virtual STDMETHODIMP OnShowWindow(BOOL f);
  16. virtual STDMETHODIMP RequestNewObjectLayout();
  17. // IOleInPlaceSite methods
  18. virtual STDMETHODIMP GetWindow(HWND *p);
  19. virtual STDMETHODIMP ContextSensitiveHelp(BOOL);
  20. virtual STDMETHODIMP CanInPlaceActivate();
  21. virtual STDMETHODIMP OnInPlaceActivate();
  22. virtual STDMETHODIMP OnUIActivate();
  23. virtual STDMETHODIMP GetWindowContext(IOleInPlaceFrame** ppFrame,IOleInPlaceUIWindow **ppDoc,LPRECT r1,LPRECT r2,LPOLEINPLACEFRAMEINFO o);
  24. virtual STDMETHODIMP Scroll(SIZE s);
  25. virtual STDMETHODIMP OnUIDeactivate(int);
  26. virtual STDMETHODIMP OnInPlaceDeactivate();
  27. virtual STDMETHODIMP DiscardUndoState();
  28. virtual STDMETHODIMP DeactivateAndUndo();
  29. virtual STDMETHODIMP OnPosRectChange(LPCRECT);
  30. // IOleInPlaceFrame methods
  31. virtual STDMETHODIMP GetBorder(LPRECT l);
  32. virtual STDMETHODIMP RequestBorderSpace(LPCBORDERWIDTHS);
  33. virtual STDMETHODIMP SetBorderSpace(LPCBORDERWIDTHS w);
  34. virtual STDMETHODIMP SetActiveObject(IOleInPlaceActiveObject*pV,LPCOLESTR s);
  35. virtual STDMETHODIMP InsertMenus(HMENU h,LPOLEMENUGROUPWIDTHS x);
  36. virtual STDMETHODIMP SetMenu(HMENU h,HOLEMENU hO,HWND hw);
  37. virtual STDMETHODIMP RemoveMenus(HMENU h);
  38. virtual STDMETHODIMP SetStatusText(LPCOLESTR t);
  39. virtual STDMETHODIMP EnableModeless(BOOL f);
  40. virtual STDMETHODIMP TranslateAccelerator(LPMSG,WORD);

这里插几句题外话, 我讨厌看文章, 因为萝莉罗嗦也没看到那个爆炸点, 就是你看到他,一下子思路有了头绪, 不再是一头雾水了.可惜,我看到的大部分文章都不是这样, 为了避免这个问题, 我在这里放个屁, 嗯,也算是一个小小的爆破吧.

好,上面已经罗列了需要的接口和接口的方法.

要想实现WB的容器,你必须有这段代码:

  1. WebBrowser::WebBrowser()
  2. {
  3. //初始化OLE
  4. OleInitialize(0);
  5. //创建IStorage对象,其中_pStorage是WebBrowser的私有变量
  6. StgCreateDocfile(0,STGM_READWRITE | STGM_SHARE_EXCLUSIVE | STGM_DIRECT | STGM_CREATE,0,&_pStorage);
  7. //创建IOleObject对象,我们看到,短短的一条语句,已经几乎创建完成了WebBrowser!
  8. //this在这里时表示当前类(即WebBrowser)作为容器,承载_pOleObj这个控件
  9. //这里就是放屁现场了,大家好好看看哈.
  10. OleCreate( CLSID_WebBrowser,IID_IOleObject,OLERENDER_DRAW, 0 , this, _pStorage, (void**)&_pOleObj );
  11. //获得IOleInPlaceObject对象
  12. _pOleObj->QueryInterface(IID_IOleInPlaceObject,(LPVOID*)&_pInPlaceObj);
  13. }
上面一段代码已经创建了wb的Ole对象, 接下来,你只需要打开WB,然后打开网页.我们用两个函数实现,他们是OpenWebBrowser() 和 OpenURL( VARIANT* pVarUrl )

OpenWebBrowser:

  1. BOOL
  2. WebBrowser::OpenWebBrowser()
  3. {
  4. BOOL bRet = FALSE;
  5. // RECTWIDTH 和 RECTHEIGHT 是计算RECT长宽的宏函数
  6. // _rcWebWnd 是WebBrowser的私有RECT成员,就是GetHWND()的大小.
  7. // 下面的语句就是关联两者
  8. // GetHWND()获取容器的框架窗口句柄,就是我们创建的窗口,关于这个函数,下面会单独讲
  9. if( (RECTWIDTH(_rcWebWnd) && RECTHEIGHT(_rcWebWnd)) == 0 )
  10. ::GetClientRect( GetHWND() ,&_rcWebWnd);//设置WebBrowser的大小为窗口的客户区大小.
  11. // _bInPlaced 是WebBrowser的一个私有BOOL成员,初始为false
  12. // 一旦执行了OLEIVERB_INPLACEACTIVATE (就是下面的操作)后,立即设置为true,防止控件被多次放置在容器中
  13. // _GetOleObject()是WebBrowser的一个保护函数成员,他只是简单的返回_pOleObj
  14. // _pOleObj就是WB控件本身. 考虑到WebBrowser是一个基本类,以后必然被其他类继承,所以使用_GetOleObject()来返回_pOleObject,来实现防止_pOleObject本身不被修改的意外.
  15. if( _bInPlaced == false )// Activate In Place
  16. {
  17. _bInPlaced = true;//_bInPlaced must be set as true, before INPLACEACTIVATE, otherwise, once DoVerb, it would return error;
  18. _bExternalPlace = 0;//lParam;
  19. _GetOleObject()->DoVerb(OLEIVERB_INPLACEACTIVATE,0,this,0, GetHWND(),&_rcWebWnd);
  20. _bInPlaced = true;
  21. }
  22. bRet = TRUE;
  23. RETURN:
  24. return bRet;
  25. }

OpenURL(...)

  1. BOOL
  2. WebBrowser::OpenURL(VARIANT* pVarUrl)
  3. {
  4. BOOL bRet = FALSE;
  5. //GetWebBrowser2 返回IWebBrowser2
  6. //他的实现是这样的:
  7. //if( _pWB2 != NULL )//_pWB2是WebBrowser的私有IWebBrowser2指针
  8. // return _pWB2;//如果_pWB2已经不是NULL,即已经获取过内容,则直接返回
  9. ////否则使用WB控件对象枚举IWebBrowser2指针
  10. //_pOleObj->QueryInterface(IID_IWebBrowser2,(void**)&_pWB2);
  11. //return _pWB2;
  12. GetWebBrowser2()->Navigate2( pVarUrl,0,0,0,0);//打开网页
  13. bRet = TRUE;
  14. RETURN:
  15. return bRet;
  16. }

三.细节

前面说过,那几个接口的方法,大部分都是直接返回E_NOTIMPL和S_OK, E_FAIL.,我说大部分,说明必然有些函数需要做一些事情,而且其作用很不小, 请看官别马虎了这段. :)

IDispatch 接口中的 IUnknown 的实现实在是不必多言, 稍微说一下接口枚举:

  1. STDMETHODIMP WebBrowser::QueryInterface(REFIID iid,void**ppvObject)
  2. {
  3. *ppvObject = 0;
  4. if ( iid == IID_IOleClientSite )
  5. *ppvObject = (IOleClientSite*)this;
  6. if ( iid == IID_IUnknown )
  7. *ppvObject = this;
  8. if ( iid == IID_IDispatch )
  9. *ppvObject = (IDispatch*)this;
  10. if ( _bExternalPlace == false)
  11. {
  12. if ( iid == IID_IOleInPlaceSite )
  13. *ppvObject = (IOleInPlaceSite*)this;
  14. if ( iid == IID_IOleInPlaceFrame )
  15. *ppvObject = (IOleInPlaceFrame*)this;
  16. if ( iid == IID_IOleInPlaceUIWindow )
  17. *ppvObject = (IOleInPlaceUIWindow*)this;
  18. }
  19. if ( iid == DIID_DWebBrowserEvents2 )
  20. *ppvObject = (DWebBrowserEvents2 *)this;
  21. if ( iid == IID_IDocHostUIHandler)
  22. *ppvObject = (IDocHostUIHandler*)this;
  23. if ( *ppvObject )
  24. {
  25. AddRef();
  26. return S_OK;
  27. }
  28. return E_NOINTERFACE;
  29. }

下面先说GetWindow

  1. //IOleInPlaceSite methods
  2. STDMETHODIMP WebBrowser::GetWindow(HWND *p)
  3. {
  4. *p = GetHWND();//需要设置p为当前框架的窗口,否则Ole对象不知道框架
  5. return S_OK;
  6. }
再来说: CanInPlaceActivate(); Ole对象会询问容器,我能不能插进来(脸红中~)? 得到准许后才能温柔的插入,粗暴是不行的哦!
  1. //IOleInPlaceSite methods
  2. STDMETHODIMP WebBrowser::CanInPlaceActivate()//If this function return S_FALSE, AX cannot activate in place!
  3. {
  4. if ( _bInPlaced )//Does WebBrowser Control already in placed?
  5. {
  6. _bCalledCanInPlace = true;
  7. return S_OK;
  8. }
  9. return S_FALSE;
  10. }
WebBrowser::GetWindowContext(...) 获取窗口上下文(内容)
  1. STDMETHODIMP WebBrowser::GetWindowContext(IOleInPlaceFrame** ppFrame,IOleInPlaceUIWindow **ppDoc,LPRECT r1,LPRECT r2,LPOLEINPLACEFRAMEINFO o)
  2. {
  3. //因为IOleInPlaceFrame接口已经被我们的WebBrowser实现
  4. //所以直接设置为this
  5. *ppFrame = (IOleInPlaceFrame*)this;
  6. AddRef();
  7. *ppDoc = NULL;
  8. // r1, r2设置为框架的大小, 让WB充满整个窗口
  9. ::GetClientRect( GetHWND() ,&_rcWebWnd );
  10. *r1 = _rcWebWnd;
  11. *r2 = _rcWebWnd;
  12. //我们没有这方面的要求,所以仅仅初始化.
  13. o->cb = sizeof(OLEINPLACEFRAMEINFO);
  14. o->fMDIApp = false;
  15. o->hwndFrame = GetParent( GetHWND() );
  16. o->haccel = 0;
  17. o->cAccelEntries = 0;
  18. return S_OK;
  19. }
好了,下面是最后一个需要加料的函数了: IOleInPlaceFrame 接口的方法: GetBorder

注意这个接口正是上面说过的函数GetWindowContent 传递给OleObj对象的

  1. //IOleInPlaceFrame methods|
  2. STDMETHODIMP WebBrowser::GetBorder(LPRECT l)
  3. {
  4. ::GetClientRect( GetHWND() ,&_rcWebWnd );
  5. *l = _rcWebWnd;
  6. return S_OK;
  7. }
到现在为止,对于容器本身的实现已经全部完成了, 但是细心的读者会问到, GetHWND(void)还没有实现那!?

实际上,WebBrowser 作为一个基本类,不应当实现GetHWND(), 相反地, 他应当作为一个纯虚函数,要求其子类实现.

然后,我做了一个实验, 发现作为纯虚函数, 不能在类的构造函数中被调用, 或者间接调用. 而我们在WebBrowser::WebBrowser()中已经间接调用了GetHWND(),所以会有问题, 于是我们耍赖,把GetHWND(){return NULL;}

这样可以解决虚函数的问题.

四. 所有实现

WebBroser.h

  1. class WebBrowser:
  2. public IDispatch,
  3. public IOleClientSite,
  4. public IOleInPlaceSite,
  5. public IOleInPlaceFrame,
  6. public IDocHostUIHandler
  7. {
  8. public:
  9. WebBrowser();
  10. ~WebBrowser(void);
  11. public:
  12. // IUnknown methods
  13. virtual STDMETHODIMP QueryInterface(REFIID iid,void**ppvObject);
  14. virtual STDMETHODIMP_(ULONG) AddRef();
  15. virtual STDMETHODIMP_(ULONG) Release();
  16. // IDispatch Methods
  17. HRESULT _stdcall GetTypeInfoCount(unsigned int * pctinfo);
  18. HRESULT _stdcall GetTypeInfo(unsigned int iTInfo,LCID lcid,ITypeInfo FAR* FAR* ppTInfo);
  19. HRESULT _stdcall GetIDsOfNames(REFIID riid,OLECHAR FAR* FAR* rgszNames,unsigned int cNames,LCID lcid,DISPID FAR* rgDispId);
  20. HRESULT _stdcall Invoke(DISPID dispIdMember,REFIID riid,LCID lcid,WORD wFlags,DISPPARAMS FAR* pDispParams,VARIANT FAR* pVarResult,EXCEPINFO FAR* pExcepInfo,unsigned int FAR* puArgErr);
  21. // IOleClientSite methods
  22. virtual STDMETHODIMP SaveObject();
  23. virtual STDMETHODIMP GetMoniker(DWORD dwA,DWORD dwW,IMoniker**pm);
  24. virtual STDMETHODIMP GetContainer(IOleContainer**pc);
  25. virtual STDMETHODIMP ShowObject();
  26. virtual STDMETHODIMP OnShowWindow(BOOL f);
  27. virtual STDMETHODIMP RequestNewObjectLayout();
  28. // IOleInPlaceSite methods
  29. virtual STDMETHODIMP GetWindow(HWND *p);
  30. virtual STDMETHODIMP ContextSensitiveHelp(BOOL);
  31. virtual STDMETHODIMP CanInPlaceActivate();
  32. virtual STDMETHODIMP OnInPlaceActivate();
  33. virtual STDMETHODIMP OnUIActivate();
  34. virtual STDMETHODIMP GetWindowContext(IOleInPlaceFrame** ppFrame,IOleInPlaceUIWindow **ppDoc,LPRECT r1,LPRECT r2,LPOLEINPLACEFRAMEINFO o);
  35. virtual STDMETHODIMP Scroll(SIZE s);
  36. virtual STDMETHODIMP OnUIDeactivate(int);
  37. virtual STDMETHODIMP OnInPlaceDeactivate();
  38. virtual STDMETHODIMP DiscardUndoState();
  39. virtual STDMETHODIMP DeactivateAndUndo();
  40. virtual STDMETHODIMP OnPosRectChange(LPCRECT);
  41. // IOleInPlaceFrame methods
  42. virtual STDMETHODIMP GetBorder(LPRECT l);
  43. virtual STDMETHODIMP RequestBorderSpace(LPCBORDERWIDTHS);
  44. virtual STDMETHODIMP SetBorderSpace(LPCBORDERWIDTHS w);
  45. virtual STDMETHODIMP SetActiveObject(IOleInPlaceActiveObject*pV,LPCOLESTR s);
  46. virtual STDMETHODIMP InsertMenus(HMENU h,LPOLEMENUGROUPWIDTHS x);
  47. virtual STDMETHODIMP SetMenu(HMENU h,HOLEMENU hO,HWND hw);
  48. virtual STDMETHODIMP RemoveMenus(HMENU h);
  49. virtual STDMETHODIMP SetStatusText(LPCOLESTR t);
  50. virtual STDMETHODIMP EnableModeless(BOOL f);
  51. virtual STDMETHODIMP TranslateAccelerator(LPMSG,WORD);
  52. protected:
  53. virtual HWND GetHWND(){return NULL;};//继承的类应该实现这个方法,告诉WebBrowser,到底用哪一个HWND放置WebBrowser
  54. // 内部工具函数
  55. private:
  56. inline IOleObject* _GetOleObject(){return _pOleObj;};
  57. inline IOleInPlaceObject* _GetInPlaceObject(){return _pInPlaceObj;};
  58. //外部方法
  59. public:
  60. IWebBrowser2* GetWebBrowser2();
  61. IHTMLDocument2* GetHTMLDocument2();
  62. IHTMLDocument3* GetHTMLDocument3();
  63. IHTMLWindow2* GetHTMLWindow2();
  64. IHTMLEventObj* GetHTMLEventObject();
  65. BOOL SetWebRect(LPRECT lprc);
  66. BOOL OpenWebBrowser();
  67. BOOL OpenURL(VARIANT* pVarUrl);
  68. // 内部数据
  69. protected:
  70. long _refNum;
  71. private:
  72. RECT _rcWebWnd;
  73. bool _bInPlaced;
  74. bool _bExternalPlace;
  75. bool _bCalledCanInPlace;
  76. bool _bWebWndInited;
  77. private:
  78. //指针
  79. IOleObject* _pOleObj;
  80. IOleInPlaceObject* _pInPlaceObj;
  81. IStorage* _pStorage;
  82. IWebBrowser2* _pWB2;
  83. IHTMLDocument2* _pHtmlDoc2;
  84. IHTMLDocument3* _pHtmlDoc3;
  85. IHTMLWindow2* _pHtmlWnd2;
  86. IHTMLEventObj* _pHtmlEvent;
  87. };
WebBrowser.cpp

注意: 里面有许多讨厌的东西, 是我加的饲料. 解释一下,我个人很喜欢这种错误处理方式.

读者可以简单的认为: (因为实际上我的实现不是那么简单,因为这个再说就有点复杂,所以简单化)

NULLTEST_SE( fn , wstr ) ; 如果 fn == 0 , 则显示 wstr, 并且跳转到RETURN

HRTEST_SE( fn, wstr); 如果 fn!=S_OK ,则显示wstr,并且跳转到RETURN

另外,考虑到WebBrowser以后总是作为另外一个类的父类,所以他完全不会因为计数器归零而自删除.

  1. #include "WebBrowser.h"
  2. /*
  3. ==================
  4. | 构造和析构 |
  5. ==================
  6. */
  7. WebBrowser::WebBrowser(void):
  8. _refNum(0),
  9. //_rcWebWnd(0),
  10. _bInPlaced(false),
  11. _bExternalPlace(false),
  12. _bCalledCanInPlace(false),
  13. _bWebWndInited(false),
  14. _pOleObj(NULL),
  15. _pInPlaceObj(NULL),
  16. _pStorage(NULL),
  17. _pWB2(NULL),
  18. _pHtmlDoc2(NULL),
  19. _pHtmlDoc3(NULL),
  20. _pHtmlWnd2(NULL),
  21. _pHtmlEvent(NULL)
  22. {
  23. ::memset( (PVOID)&_rcWebWnd,0,sizeof(_rcWebWnd));
  24. HRTEST_SE( OleInitialize(0),L"Ole初始化错误");
  25. HRTEST_SE( StgCreateDocfile(0,STGM_READWRITE | STGM_SHARE_EXCLUSIVE | STGM_DIRECT | STGM_CREATE,0,&_pStorage),L"StgCreateDocfile错误");
  26. HRTEST_SE( OleCreate(CLSID_WebBrowser,IID_IOleObject,OLERENDER_DRAW,0,this,_pStorage,(void**)&_pOleObj),L"Ole创建失败");
  27. HRTEST_SE( _pOleObj->QueryInterface(IID_IOleInPlaceObject,(LPVOID*)&_pInPlaceObj),L"OleInPlaceObject创建失败");
  28. RETURN:
  29. return;
  30. }
  31. WebBrowser::~WebBrowser(void)
  32. {
  33. }
  34. /*
  35. ==================
  36. |IUnknown methods|
  37. ==================
  38. */
  39. STDMETHODIMP WebBrowser::QueryInterface(REFIID iid,void**ppvObject)
  40. {
  41. *ppvObject = 0;
  42. if ( iid == IID_IOleClientSite )
  43. *ppvObject = (IOleClientSite*)this;
  44. if ( iid == IID_IUnknown )
  45. *ppvObject = this;
  46. if ( iid == IID_IDispatch )
  47. *ppvObject = (IDispatch*)this;
  48. if ( _bExternalPlace == false)
  49. {
  50. if ( iid == IID_IOleInPlaceSite )
  51. *ppvObject = (IOleInPlaceSite*)this;
  52. if ( iid == IID_IOleInPlaceFrame )
  53. *ppvObject = (IOleInPlaceFrame*)this;
  54. if ( iid == IID_IOleInPlaceUIWindow )
  55. *ppvObject = (IOleInPlaceUIWindow*)this;
  56. }
  57. /*
  58. 这里是一点走私货, 留在以后讲,如果有机会,你可以发现,原来如此简单.
  59. if ( iid == DIID_DWebBrowserEvents2 )
  60. *ppvObject = (DWebBrowserEvents2 *)this;
  61. if ( iid == IID_IDocHostUIHandler)
  62. *ppvObject = (IDocHostUIHandler*)this;
  63. */
  64. if ( *ppvObject )
  65. {
  66. AddRef();
  67. return S_OK;
  68. }
  69. return E_NOINTERFACE;
  70. }
  71. STDMETHODIMP_(ULONG) WebBrowser::AddRef()
  72. {
  73. return ::InterlockedIncrement( &_refNum );
  74. }
  75. STDMETHODIMP_(ULONG) WebBrowser::Release()
  76. {
  77. return ::InterlockedDecrement( &_refNum );
  78. }
  79. /*
  80. =====================
  81. | IDispatch Methods |
  82. =====================
  83. */
  84. HRESULT _stdcall WebBrowser::GetTypeInfoCount(
  85. unsigned int * pctinfo)
  86. {
  87. return E_NOTIMPL;
  88. }
  89. HRESULT _stdcall WebBrowser::GetTypeInfo(
  90. unsigned int iTInfo,
  91. LCID lcid,
  92. ITypeInfo FAR* FAR* ppTInfo)
  93. {
  94. return E_NOTIMPL;
  95. }
  96. HRESULT _stdcall WebBrowser::GetIDsOfNames(REFIID riid,
  97. OLECHAR FAR* FAR* rgszNames,
  98. unsigned int cNames,
  99. LCID lcid,
  100. DISPID FAR* rgDispId )
  101. {
  102. return E_NOTIMPL;
  103. }
  104. HRESULT _stdcall WebBrowser::Invoke(
  105. DISPID dispIdMember,
  106. REFIID riid,
  107. LCID lcid,
  108. WORD wFlags,
  109. DISPPARAMS* pDispParams,
  110. VARIANT* pVarResult,
  111. EXCEPINFO* pExcepInfo,
  112. unsigned int* puArgErr)
  113. {
  114. /*走私货,留在以后讲,是关于DWebBrowserEvents2让人激动的实现,而且简单.
  115. // DWebBrowserEvents2
  116. if( dispIdMember == DISPID_DOCUMENTCOMPLETE)
  117. {
  118. DocumentComplete(pDispParams->rgvarg[1].pdispVal,pDispParams->rgvarg[0].pvarVal);
  119. return S_OK;
  120. }
  121. if( dispIdMember == DISPID_BEFORENAVIGATE2)
  122. {
  123. BeforeNavigate2( pDispParams->rgvarg[6].pdispVal,
  124. pDispParams->rgvarg[5].pvarVal,
  125. pDispParams->rgvarg[4].pvarVal,
  126. pDispParams->rgvarg[3].pvarVal,
  127. pDispParams->rgvarg[2].pvarVal,
  128. pDispParams->rgvarg[1].pvarVal,
  129. pDispParams->rgvarg[0].pboolVal);
  130. return S_OK;
  131. }
  132. */
  133. return E_NOTIMPL;
  134. }
  135. /*
  136. ========================
  137. |IOleClientSite methods|
  138. ========================
  139. */
  140. STDMETHODIMP WebBrowser::SaveObject()
  141. {
  142. return S_OK;
  143. }
  144. STDMETHODIMP WebBrowser::GetMoniker(DWORD dwA,DWORD dwW,IMoniker**pm)
  145. {
  146. *pm = 0;
  147. return E_NOTIMPL;
  148. }
  149. STDMETHODIMP WebBrowser::GetContainer(IOleContainer**pc)
  150. {
  151. *pc = 0;
  152. return E_FAIL;
  153. }
  154. STDMETHODIMP WebBrowser::ShowObject()
  155. {
  156. return S_OK;
  157. }
  158. STDMETHODIMP WebBrowser::OnShowWindow(BOOL f)
  159. {
  160. return S_OK;
  161. }
  162. STDMETHODIMP WebBrowser::RequestNewObjectLayout()
  163. {
  164. return S_OK;
  165. }
  166. /*
  167. =========================
  168. |IOleInPlaceSite methods|
  169. =========================
  170. */
  171. STDMETHODIMP WebBrowser::GetWindow(HWND *p)
  172. {
  173. *p = GetHWND();
  174. return S_OK;
  175. }
  176. STDMETHODIMP WebBrowser::ContextSensitiveHelp(BOOL)
  177. {
  178. return E_NOTIMPL;
  179. }
  180. STDMETHODIMP WebBrowser::CanInPlaceActivate()//If this function return S_FALSE, AX cannot activate in place!
  181. {
  182. if ( _bInPlaced )//Does WebBrowser Control already in placed?
  183. {
  184. _bCalledCanInPlace = true;
  185. return S_OK;
  186. }
  187. return S_FALSE;
  188. }
  189. STDMETHODIMP WebBrowser::OnInPlaceActivate()
  190. {
  191. return S_OK;
  192. }
  193. STDMETHODIMP WebBrowser::OnUIActivate()
  194. {
  195. return S_OK;
  196. }
  197. STDMETHODIMP WebBrowser::GetWindowContext(IOleInPlaceFrame** ppFrame,IOleInPlaceUIWindow **ppDoc,LPRECT r1,LPRECT r2,LPOLEINPLACEFRAMEINFO o)
  198. {
  199. *ppFrame = (IOleInPlaceFrame*)this;
  200. AddRef();
  201. *ppDoc = NULL;
  202. ::GetClientRect( GetHWND() ,&_rcWebWnd );
  203. *r1 = _rcWebWnd;
  204. *r2 = _rcWebWnd;
  205. o->cb = sizeof(OLEINPLACEFRAMEINFO);
  206. o->fMDIApp = false;
  207. o->hwndFrame = GetParent( GetHWND() );
  208. o->haccel = 0;
  209. o->cAccelEntries = 0;
  210. return S_OK;
  211. }
  212. STDMETHODIMP WebBrowser::Scroll(SIZE s)
  213. {
  214. return E_NOTIMPL;
  215. }
  216. STDMETHODIMP WebBrowser::OnUIDeactivate(int)
  217. {
  218. return S_OK;
  219. }
  220. STDMETHODIMP WebBrowser::OnInPlaceDeactivate()
  221. {
  222. return S_OK;
  223. }
  224. STDMETHODIMP WebBrowser::DiscardUndoState()
  225. {
  226. return S_OK;
  227. }
  228. STDMETHODIMP WebBrowser::DeactivateAndUndo()
  229. {
  230. return S_OK;
  231. }
  232. STDMETHODIMP WebBrowser::OnPosRectChange(LPCRECT)
  233. {
  234. return S_OK;
  235. }
  236. /*
  237. ==========================
  238. |IOleInPlaceFrame methods|
  239. ==========================
  240. */
  241. STDMETHODIMP WebBrowser::GetBorder(LPRECT l)
  242. {
  243. ::GetClientRect( GetHWND() ,&_rcWebWnd );
  244. *l = _rcWebWnd;
  245. return S_OK;
  246. }
  247. STDMETHODIMP WebBrowser::RequestBorderSpace(LPCBORDERWIDTHS b)
  248. {
  249. return S_OK;
  250. }
  251. STDMETHODIMP WebBrowser::SetBorderSpace(LPCBORDERWIDTHS b)
  252. {
  253. return S_OK;
  254. }
  255. STDMETHODIMP WebBrowser::SetActiveObject(IOleInPlaceActiveObject*pV,LPCOLESTR s)
  256. {
  257. return S_OK;
  258. }
  259. STDMETHODIMP WebBrowser::SetStatusText(LPCOLESTR t)
  260. {
  261. return E_NOTIMPL;
  262. }
  263. STDMETHODIMP WebBrowser::EnableModeless(BOOL f)
  264. {
  265. return E_NOTIMPL;
  266. }
  267. STDMETHODIMP WebBrowser::TranslateAccelerator(LPMSG,WORD)
  268. {
  269. return E_NOTIMPL;
  270. }
  271. HRESULT _stdcall WebBrowser::RemoveMenus(HMENU h)
  272. {
  273. return E_NOTIMPL;
  274. }
  275. HRESULT _stdcall WebBrowser::InsertMenus(HMENU h,LPOLEMENUGROUPWIDTHS x)
  276. {
  277. return E_NOTIMPL;
  278. }
  279. HRESULT _stdcall WebBrowser::SetMenu(HMENU h,HOLEMENU hO,HWND hw)
  280. {
  281. return E_NOTIMPL;
  282. }
  283. /*
  284. ====================
  285. |DWebBrowserEvents2|
  286. ====================
  287. */
  288. /* 走私货,以后再讲
  289. void
  290. WebBrowser::DocumentComplete( IDispatch *pDisp,VARIANT *URL)
  291. {
  292. //老天保佑,多好的函数啊.
  293. return ;
  294. }
  295. void
  296. WebBrowser::BeforeNavigate2( IDispatch *pDisp,VARIANT *&url,VARIANT *&Flags,VARIANT *&TargetFrameName,VARIANT *&PostData,VARIANT *&Headers,VARIANT_BOOL *&Cancel)
  297. {
  298. PCWSTR pcwApp = L"app:";
  299. if( url->vt != VT_BSTR )
  300. return;
  301. if( 0 == _wcsnicmp( pcwApp, url->bstrVal,wcslen(pcwApp)) )
  302. {
  303. *Cancel = VARIANT_TRUE;
  304. _OnHtmlCmd( url->bstrVal+wcslen(pcwApp) );
  305. return;
  306. }
  307. *Cancel = VARIANT_FALSE;
  308. }
  309. */
  310. /*
  311. =====================
  312. | IDocHostUIHandler |
  313. =====================
  314. */
  315. /*
  316. 传说中的IDocHostUIHanler,同样留在以后讲
  317. HRESULT WebBrowser:: ShowContextMenu(
  318. DWORD dwID,
  319. POINT *ppt,
  320. IUnknown *pcmdtReserved,
  321. IDispatch *pdispReserved){return E_NOTIMPL;}
  322. HRESULT WebBrowser:: GetHostInfo(
  323. DOCHOSTUIINFO *pInfo){return E_NOTIMPL;}
  324. HRESULT WebBrowser:: ShowUI(
  325. DWORD dwID,
  326. IOleInPlaceActiveObject *pActiveObject,
  327. IOleCommandTarget *pCommandTarget,
  328. IOleInPlaceFrame *pFrame,
  329. IOleInPlaceUIWindow *pDoc){return E_NOTIMPL;}
  330. HRESULT WebBrowser:: HideUI( void){return E_NOTIMPL;}
  331. HRESULT WebBrowser:: UpdateUI( void){return E_NOTIMPL;}
  332. //HRESULT WebBrowser:: EnableModeless(
  333. // BOOL fEnable){return E_NOTIMPL;}
  334. HRESULT WebBrowser:: OnDocWindowActivate(
  335. BOOL fActivate){return E_NOTIMPL;}
  336. HRESULT WebBrowser:: OnFrameWindowActivate(
  337. BOOL fActivate){return E_NOTIMPL;}
  338. HRESULT WebBrowser:: ResizeBorder(
  339. LPCRECT prcBorder,
  340. IOleInPlaceUIWindow *pUIWindow,
  341. BOOL fRameWindow){return E_NOTIMPL;}
  342. HRESULT WebBrowser:: TranslateAccelerator(
  343. LPMSG lpMsg,
  344. const GUID *pguidCmdGroup,
  345. DWORD nCmdID){return E_NOTIMPL;}
  346. HRESULT WebBrowser:: GetOptionKeyPath(
  347. LPOLESTR *pchKey,
  348. DWORD dw){return E_NOTIMPL;}
  349. HRESULT WebBrowser:: GetDropTarget(
  350. IDropTarget *pDropTarget,
  351. IDropTarget **ppDropTarget)
  352. {
  353. return E_NOTIMPL;//使用默认拖拽
  354. //return S_OK;//自定义拖拽
  355. }
  356. HRESULT WebBrowser:: GetExternal( IDispatch **ppDispatch)
  357. {
  358. return E_NOTIMPL;
  359. }
  360. HRESULT WebBrowser:: TranslateUrl(
  361. DWORD dwTranslate,
  362. OLECHAR *pchURLIn,
  363. OLECHAR **ppchURLOut){return E_NOTIMPL;}
  364. HRESULT WebBrowser:: FilterDataObject(
  365. IDataObject *pDO,
  366. IDataObject **ppDORet){return E_NOTIMPL;}
  367. */
  368. /*
  369. ===============
  370. |Other Methods|
  371. ===============
  372. */
  373. IWebBrowser2*
  374. WebBrowser::GetWebBrowser2()
  375. {
  376. if( _pWB2 != NULL )
  377. return _pWB2;
  378. NULLTEST_SE( _pOleObj,L"Ole对象为空");
  379. HRTEST_SE( _pOleObj->QueryInterface(IID_IWebBrowser2,(void**)&_pWB2),L"QueryInterface IID_IWebBrowser2 失败");
  380. return _pWB2;
  381. RETURN:
  382. return NULL;
  383. }
  384. IHTMLDocument2*
  385. WebBrowser::GetHTMLDocument2()
  386. {
  387. if( _pHtmlDoc2 != NULL )
  388. return _pHtmlDoc2;
  389. IWebBrowser2* pWB2 = NULL;
  390. NULLTEST(pWB2 = GetWebBrowser2());//GetWebBrowser2已经将错误原因交给LastError.
  391. IDispatch* pDp = NULL;
  392. HRTEST_SE(pWB2->get_Document(&pDp),L"DWebBrowser2::get_Document 错误");
  393. HRTEST_SE(pDp->QueryInterface(IID_IHTMLDocument2,(void**)&_pHtmlDoc2),L"QueryInterface IID_IHTMLDocument2 失败");
  394. return _pHtmlDoc2;
  395. RETURN:
  396. return NULL;
  397. }
  398. IHTMLDocument3*
  399. WebBrowser::GetHTMLDocument3()
  400. {
  401. if( _pHtmlDoc3 != NULL )
  402. return _pHtmlDoc3;
  403. IWebBrowser2* pWB2 = NULL;
  404. NULLTEST(pWB2 = GetWebBrowser2());//GetWebBrowser2已经将错误原因交给LastError.
  405. IDispatch* pDp = NULL;
  406. HRTEST_SE(pWB2->get_Document(&pDp),L"DWebBrowser2::get_Document 错误");
  407. HRTEST_SE(pDp->QueryInterface(IID_IHTMLDocument3,(void**)&_pHtmlDoc3),L"QueryInterface IID_IHTMLDocument3 失败");
  408. return _pHtmlDoc3;
  409. RETURN:
  410. return NULL;
  411. }
  412. IHTMLWindow2*
  413. WebBrowser::GetHTMLWindow2()
  414. {
  415. if( _pHtmlWnd2 != NULL)
  416. return _pHtmlWnd2;
  417. IHTMLDocument2* pHD2 = GetHTMLDocument2();
  418. NULLTEST( pHD2 );
  419. HRTEST_SE( pHD2->get_parentWindow(&_pHtmlWnd2),L"IHTMLWindow2::get_parentWindow 错误" );
  420. return _pHtmlWnd2;
  421. RETURN:
  422. return NULL;
  423. }
  424. IHTMLEventObj*
  425. WebBrowser::GetHTMLEventObject()
  426. {
  427. if( _pHtmlEvent != NULL )
  428. return _pHtmlEvent;
  429. IHTMLWindow2* pHW2;
  430. NULLTEST( pHW2 = GetHTMLWindow2() );
  431. HRTEST_SE( pHW2->get_event(&_pHtmlEvent),L"IHTMLWindow2::get_event 错误");
  432. return _pHtmlEvent;
  433. RETURN:
  434. return NULL;
  435. }
  436. BOOL
  437. WebBrowser::SetWebRect(LPRECT lprc)
  438. {
  439. BOOL bRet = FALSE;
  440. if( false == _bInPlaced )//尚未OpenWebBrowser操作,直接写入_rcWebWnd
  441. {
  442. _rcWebWnd = *lprc;
  443. }
  444. else//已经打开WebBrowser,通过 IOleInPlaceObject::SetObjectRects 调整大小
  445. {
  446. SIZEL size;
  447. size.cx = RECTWIDTH(*lprc);
  448. size.cy = RECTHEIGHT(*lprc);
  449. IOleObject* pOleObj;
  450. NULLTEST( pOleObj= _GetOleObject());
  451. HRTEST_E( pOleObj->SetExtent( 1,&size ),L"SetExtent 错误");
  452. IOleInPlaceObject* pInPlace;
  453. NULLTEST( pInPlace = _GetInPlaceObject());
  454. HRTEST_E( pInPlace->SetObjectRects(lprc,lprc),L"SetObjectRects 错误");
  455. _rcWebWnd = *lprc;
  456. }
  457. bRet = TRUE;
  458. RETURN:
  459. return bRet;
  460. }
  461. BOOL
  462. WebBrowser::OpenWebBrowser()
  463. {
  464. BOOL bRet = FALSE;
  465. NULLTEST_E( _GetOleObject(),L"ActiveX对象为空" );//对于本身的实现函数,其自身承担错误录入工作
  466. if( (RECTWIDTH(_rcWebWnd) && RECTHEIGHT(_rcWebWnd)) == 0 )
  467. ::GetClientRect( GetHWND() ,&_rcWebWnd);//设置WebBrowser的大小为窗口的客户区大小.
  468. if( _bInPlaced == false )// Activate In Place
  469. {
  470. _bInPlaced = true;//_bInPlaced must be set as true, before INPLACEACTIVATE, otherwise, once DoVerb, it would return error;
  471. _bExternalPlace = 0;//lParam;
  472. HRTEST_E( _GetOleObject()->DoVerb(OLEIVERB_INPLACEACTIVATE,0,this,0, GetHWND() ,&_rcWebWnd),L"关于INPLACE的DoVerb错误");
  473. _bInPlaced = true;
  474. //* 挂接DWebBrwoser2Event
  475. IConnectionPointContainer* pCPC = NULL;
  476. IConnectionPoint* pCP = NULL;
  477. HRTEST_E( GetWebBrowser2()->QueryInterface(IID_IConnectionPointContainer,(void**)&pCPC),L"枚举IConnectionPointContainer接口失败");
  478. HRTEST_E( pCPC->FindConnectionPoint( DIID_DWebBrowserEvents2,&pCP),L"FindConnectionPoint失败");
  479. DWORD dwCookie = 0;
  480. HRTEST_E( pCP->Advise( (IUnknown*)(void*)this,&dwCookie),L"IConnectionPoint::Advise失败");
  481. }
  482. bRet = TRUE;
  483. RETURN:
  484. return bRet;
  485. }
  486. BOOL
  487. WebBrowser::OpenURL(VARIANT* pVarUrl)
  488. {
  489. BOOL bRet = FALSE;
  490. HRTEST_E( GetWebBrowser2()->Navigate2( pVarUrl,0,0,0,0),L"GetWebBrowser2 失败");
  491. bRet = TRUE;
  492. RETURN:
  493. return bRet;
  494. }

五.例子

  1. class WebBrowserWindow :
  2. public WebBrowser
  3. {
  4. public:
  5. WebBrowserWindow(void);
  6. ~WebBrowserWindow(void);
  7. public:
  8. virtual HWND GetHWND(){ return YourWindow};
  9. private:
  10. LRESULT OnCreate( WPARAM wParam,LPARAM lParam);
  11. //您可以在OnCreate中调用OpenWebBrowser 然后调用 OpenURL
  12. };

六.下期预告,如果有的话

如果有人感兴趣的话, 以后会说道如何扩展WebBrowser, 让他包罗万象, 你会发现很简单.

如果有问题,欢迎提问. 谢谢.