IE中，ActiveX控件中控制Internet Explorer 事件

如何对webbrowser和IE编程（十一）

转http://blog.youkuaiyun.com/shanhe/article/category/15859

仅仅用于Internet Explorer的事件

有些是仅仅可用于自动化 Internet Explorer,:

·         OnQuit

• OnVisible
• OnToolBar
• OnMenuBar
• OnStatusBar
• OnFullScreen
• OnTheaterMode

大多数这些事件属于浏览器用户接口. 另外一些必须要先是或者关闭Internet Explorer才发生. 一些情形中，这些事件将在你宿主webbrowser空间的时候发生. 举例来讲,当你在你的应用程序设置MenuBar 属性,尽管你的WebBrowser control 并没有菜单条,OnMenuBar 事件将被激发, 但是如果你显示或者隐藏你的应用程序菜单条，OnMenuBar 事件不会激发.为什么?因为你的菜单条由你控制，webbrowser对这些用户接口项一无所知. 很长时间以来，这些相互矛盾的功能是一些混乱的根源。

其中一个事件—OnQuit—将永远不会在你的应用程序中激发.举个例子, 察看表 Table 7-6. 注意到OnQuit事件当用户关闭 Internet Explorer 或者当Quit 方法被调用时激发.如果你宿主改控件且用户关闭你的应用程序,  OnQuit 事件不会激发.它仅仅在你自动化Internet Explorer 且用户手动关闭浏览器时候发生.另外，如果你在宿主一个webbrowser控件时试图调用Quit方法,一个自动化错误将会发生.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

自ActiveX控件中控制Internet Explorer 事件

通过 IWebBrowser2 接口你可以在利用vc++在ActiveX 控件中接受事件.

你可能疑惑为什么要在ActiveX控件中接受 Internet Explorer事件.之前介绍"DocumentComplete," 事件时候，我提到过你不可以在DocumentComplete event 事件被触发前安全存取文档.在Activex控件中获知DocumentComplete 事件被触发的途径是ActiveX 控件接收 Internet Explorer并处理 DocumentComplete 事件.

除了你必须接收Internet Explorer 事件外, 你可以开发一个可导航的类浏览器的应用于公司intranet或者学校网络.你可以在ActiveX control中自动化Internet Explorer并接受其事件。.

当你刷新一个页面,也许DocumentComplete 事件并不激发.当DocumentComplete 事件并未触发, ProgressChange 事件被用来控制以检测某页是否完成加载.载一个简单的web页或者没有嵌入帧时ProgressChange 工作的很好.

记住 ProgressChange 右两个参数告诉你下载操作的进度.第一个参数当下在完成时候设定为-1, 者可以帮助你检测是否可做类打印等操作

让我们学习一个打印控active控件，为从Internet Explorer接收事件,你必须设置事件接收,意味着你必须通过IWebBrowser2  接口以获得实现,如下实现:

protected:    CComPtr<IWebBrowser2> m_spWebBrowser;

.

接下来覆盖IOleObjectImpl 的SetClientSite方法的实现. SetClientSite 放方法是在Internet Explorer通知气客户区的控件的时候被调用.你可用客户区的site指针 (m_spClientSite) 存取容器并且得到IWebBrowser2接口指针. 在SetClientSite 实现中, 你必须首先调用其基类版本,就想如下：

IOleObjectImpl<CPrintCtl>::SetClientSite(pClientSite);

这些带吗看起来可能有些生疏, 但记住 IOleObjectImpl是一个模版类. 为了调用它的方法, 你必须制定要求的模版参数以指示编译器哪一个类实例在调用SetClientSite 方法时被使用. 现在讲残存的访问容器和IWebBrowser2接口指针的代码从Print方法迁移到SetClientSite 方法Now move the remaining codePrint 方法将看起来如下:

STDMETHODIMP CPrintCtl::Print() {    ATLASSERT(m_spWebBrowser);      HRESULT hr = E_FAIL;      if (m_spWebBrowser)    {       hr = m_spWebBrowser->ExecWB(OLECMDID_PRINT,                                   OLECMDEXECOPT_PROMPTUSER, NULL, NULL);    }      return hr; }

而 SetClientSite 方法将接收事件，SetClientSite 讲看起来如下:

注意

---

你不能够再FinalConstructm方法中接收事件因为此时客户站点还未设定。

STDMETHODIMP CPrintCtl::SetClientSite(IOleClientSite* pClientSite) {    HRESULT hr = IOleObjectImpl<CPrintCtl>::SetClientSite(pClientSite);      if (!pClientSite)    {       return hr;    }      CComPtr<IOleContainer> spContainer;    m_spClientSite->GetContainer(&spContainer);      ATLASSERT(spContainer);      if (SUCCEEDED(hr))    {       // Set up the event sink.       //       CComQIPtr<IServiceProvider, &IID_IServiceProvider>          spServiceProvider(spContainer);         ATLASSERT(spServiceProvider);         if (spServiceProvider)       {          spServiceProvider->QueryService(SID_SInternetExplorer,                                          IID_IWebBrowser2,                                          (void**)&m_spWebBrowser);          ATLASSERT(m_spWebBrowser);            if (m_spWebBrowser)          {             AtlAdvise(m_spWebBrowser, GetUnknown(),                       DIID_DWebBrowserEvents2, &m_dwCookie);          }       }    }      return hr; }

注意到在AtlAdvise 调用时你必须建立protected 或者privateDWORD的数据成员以掌握返回自AtlAdvise 方法的cookie. CprintCtl 类的构造函数初始化改成员为0.尽管我们注意到CPrintCtl::SetClientSite 方法使用IOleObjectImpl::SetClientSite 方法的返回值. 此方法并不检查已被调用的返回值因为CPrintCtl::SetClientSi将 反射客户站点的设定状态.

最好, 我们检查pClientSite 的返回值，输入参数是NULL. 如果这样,我们当Internet Explorer 卸载这些控时, 他调用SetClientSite w设置为NULL. 或者告诉你已经从站点解除, 所以包含一个接口，IWebBrowser2 容器不需要一定执行。.

因为当你完成任务时应当关闭任务的站点, 也包含某个控件被卸载时。检查pClientSite是否为NULL,以便放置AtlUnadvise 方法. 记住pClientSite在控件被卸载时为 NULL. 看起来如下:

if (!pClientSite) {    ATLASSERT(m_spWebBrowser);      if (m_spWebBrowser)       AtlUnadvise(m_spWebBrowser, DIID_DWebBrowserEvents2, m_dwCookie);      return hr; }

现在你可以使用AtlAdvise接收事件,让我们控制事件.为此你必须覆盖重写IDispatchImpl 的Invoke方法. 典型的,你将为你的时间建立一个单独的类因为 Internet Explorer 事件的DISPIDs 必须同你的控件的DISPIDs 不同.但在此你可以简单在CPrintCtl  类中来实现.实现Invoke (入代码所示)以控制ProgressChange 事件.在事件句柄, 如果progres的总数设定为-1,设定一个标志变量指示已被打印.

 

STDMETHODIMP CPrintCtl::Invoke(DISPID dispidMember,                                REFIID riid,                                LCID lcid,                                WORD wFlags,                                DISPPARAMS* pDispParams,                                VARIANT* pvarResult,                                EXCEPINFO* pExcepInfo,                                UINT* puArgErr) {    if (riid != IID_NULL)       return DISP_E_UNKNOWNINTERFACE;      if (!pDispParams)       return DISP_E_PARAMNOTOPTIONAL;      switch (dispidMember)    {       //       // The parameters for this DISPID:       // [0]: Maximum progress - VT_I4      // [1]: Amount of total progress - VT_I4       //       case DISPID_PROGRESSCHANGE:          if (pDispParams->cArgs != 0)          {             // Make sure that you access the             // correct data member of the rgvarg array.             // To do this, check the type of data to             // make sure it is correct.             //             if (pDispParams->cArgs > 1                && pDispParams->rgvarg[1].vt == VT_I4                && pDispParams->rgvarg[0].vt == VT_I4)             {                if (-1 == pDispParams->rgvarg[1].lVal)                   m_fCanBePrinted = TRUE;             }          }            break;         default:          // Call the base class implementation of Invoke          // so that IPrintCtl methods and properties will          // work correctly.          //          IDispatchImpl<IPrintCtl, &IID_IPrintCtl,             &LIBID_ATLPRINTLib>::Invoke(dispidMember, riid, lcid,                                         wFlags, pDispParams,                                         pvarResult, pExcepInfo, puArgErr);            break;    }      return S_OK; }

在 ProgressChange 事件处理中，当Progress参数(pDispParams->rgvarg[1].lVal) 是-1, 我们设置一个变量告诉控件问打光在完成可以打印. FCanBePrinted 就是我们要设定的变量。

现在当用户试图调用Print 方法打印文档,你可以检查变量以确定是否可打印. 此处为Print 方法的代码:

STDMETHODIMP CPrintCtl::Print() {    if (!m_fCanBePrinted)    {       ::MessageBox(NULL, _T("The page is not ready to be printed."),                    _T("PrintCtl"), MB_OK);       return E_FAIL;    }      ATLASSERT(m_spWebBrowser);      HRESULT hr = E_FAIL;      if (m_spWebBrowser)    {       hr = m_spWebBrowser->ExecWB(OLECMDID_PRINT,                                   OLECMDEXECOPT_PROMPTUSER, NULL, NULL);    }      return hr; }