下载源代码

关键字：Band，Desk Band，Explorer Band，Tool Band，浏览器栏，工具栏，桌面工具栏

一、引言
　　最近，由于工作的要求，我需要在 IE 上做一些开发工作。于是在 MSDN 上翻阅了一些资料，根据 MSDN 上的说明我用 ATL 胜利完成了“资本家老板”分配的任务。
（并且在白天睡觉的过程中梦到了老板给我加工资啦......）
现在，我把 MSDN 上的原文资料，经过翻译整理并把一个 ATL 的实现奉贤给 VCKBASE 上的朋友们。

• 概念
• 原理
  基本band 对象
  必须实现的 COM 接口
      IPersistStream
      IObjectWithSite
      IDeskBand、IDockingWindow、IOleWindow
  选择实现的 COM 接口
  Band 对象注册
• ATL 实现

二、概念
　　在翻译的过程中，有两个词汇非常不好理解。第一个词是 Band 对象，词典中翻译为“镶边、裙子边、带子、乐队......”我的英文水平有限，实在不知道应该翻译为什么词汇更合适。于是我毅然决然地决定：在如下的论述中，依然使用 band 这个词！（什么？没听明白？我的意思就是说，我不翻译这个词了）但到底 Band 对象应该如何理解那？请看图一：


图一

　　图一中画红圈的地方，分别称作“垂直的浏览器栏”、“水平的浏览器栏”、“工具栏”和“桌面工具栏”。这些“栏”，都可以在 IE 的“查看”菜单中或鼠标右键的上下文快捷方式菜单中显示或隐藏起来。这些界面窗口的实现，其实就是实现一种 COM 接口对象，而这个对象叫 band。这个概念实在是只能意会而无法言传的，我总不能在文章中把它翻译为“总是靠在 IE 主窗口边上的对象”吧？^_^
　　另外，还有一个词叫 site。这个很好翻译，叫“站点”！。呵呵，我敢打包票，如果你要能理解这个翻译在计算机类文章中的含义，那就只能恭喜你了，你的智慧太高了。（都是学计算机软件的人，做人的差距咋就这么大呢？）在本篇文章中，site 可以这样理解：IE 的主框架四周，就好比是“汽车站”，那些 band 对象，就好比是“汽车”。band 汽车总是可以停靠在“汽车站”上。所以，site 就是“站点”，它也是 COM 接口的对象（IObjectWithSite、IInputObjectSite）。

三、原理

3.1　基本 band 对象
　　Band 对象，从 Shell 4.71(IE 5.0) 开始提供支持。Band 是一个 COM 对象，必须放在一个容器中去使用，当然使用它们就好象使用普通窗口是一样的。IE 就是一个容器，桌面 Shell 也是一个容器，它们提供不同的函数功能，但基本的实现是相似的。
　　Band 对象分三种类型，浏览器栏 band（Explorer bands）、工具栏 band（Tool Bands）和桌面工具栏(Desk bands)，而浏览器栏 band 又有两种表现形式：垂直和水平的。那么 IE 和 Shell 如何区分并加载这些 bands 对象呢？方法是：你要对不同的 band 对象，在注册表中注册不同的组件类型（CATID）。

Band 样式	组件类型	CATID
垂直的浏览器栏	CATID_InfoBand	00021493-0000-0000-C000-000000000046
水平的浏览器栏	CATID_CommBand	00021494-0000-0000-C000-000000000046
桌面的工具栏	CATID_DeskBand	00021492-0000-0000-C000-000000000046

　　IE 工具栏不使用组件类型注册，而是使用在注册进行 CLSID 的登记方式。详细情况见 3.3。
　　在例子程序中，实现了全部四个类型的 band 对象，垂直浏览器栏(CVerticalBar)显示了一个 HTML 文件，并且实现了对 IE 主窗口浏览网页的导航等功能；水平的浏览器栏(CHorizontalBar)是一个编辑窗，它同步显示当前网页的 BODY 源文件内容；IE 工具栏(CToolBar)最简单，只是添加了一个空的工具栏；桌面工具栏(CDeskBar)实现了一个单行编辑窗口，你可以在上面输入命令行或文件名称，回车后它会执行 Shell 的打开动作。

3.2　必须实现的 COM 接口
　　Band 对象是 IE 或 Shell 的进程内服务器，所以它被包装在 DLL 中。而作为 COM 对象，它必须要实现 IUnknown 和 IClassFactory 接口。（大家可以不同操心，因为我们用 ATL 写程序，这两个接口是不用我们自己写代码的。）另外，Band 对象还必须实现 IDeskBand、IObjectWithSite 和 IPersistStream 三个接口：
　　IPersistStream 是持续性接口的一种。当 IE 加载 band 对象的时候，它通过这个接口的 Load 方法传递属性值给对象，让其进行初始化；而当卸载前，IE 则调用这个接口的 Save 方法保存对象的属性。用 ATL 实现这个接口很简单：

class ATL_NO_VTABLE Cxxx : 	......	public IPersistStreamInitImpl, // 添加继承	......{public:	BOOL m_bRequiresSave; // IPersistStreamInitImpl 所必须的变量......BEGIN_COM_MAP(CVerticalBar)	......	COM_INTERFACE_ENTRY2(IPersist, IPersistStreamInit)	COM_INTERFACE_ENTRY2(IPersistStream, IPersistStreamInit)	COM_INTERFACE_ENTRY(IPersistStreamInit)	......END_COM_MAP()BEGIN_PROP_MAP(Cxxx)...... // 添加需要持续性的属性END_PROP_MAP()		

STDMETHODIMP Cxxx::SetSite(IUnknown *pUnkSite){	if( NULL == pUnkSite )	// 释放 band 的时候	{		// 如果加载的时候，保存了一些接口		// 那么现在：释放它	}	else	// 加载 band 的时候	{		m_hwndParent = NULL;	// 装载 band 的父窗口(就是带有标题的那个框架窗口)		// 这个窗口的句柄，是调用 IUnknown::QueryInterface() 得到 IOleWindow		// 然后调用 IOleWindow::GetWindow() 而获得的。		CComQIPtr< IOleWindow, &IID_IOleWindow > spOleWindow(pUnkSite);		if( spOleWindow )	spOleWindow->GetWindow(&m_hwndParent);		if( !m_hwndParent )	return E_FAIL;				// 现在，正好是建立子窗口的时机。		// 注意，子窗口建立的时候，不要使用 WS_VISIBLE 属性		... ...		// 在例子程序中，用 CAxWindow 实现了一个能包容ActiveX的容器窗口(垂直浏览器栏)		// 在例子程序中，用 WIN API 函数 CreateWindow 实现了标准窗口(水平浏览器栏、工具栏)		// 在例子程序中，用 CWindowImpl 实现了一个包容窗口(桌面工具栏)		/*********************************************************/		   以下部分，根据 band 对象特有的功能，是可以选择实现的		**********************************************************/				// 如果子窗口实现了用户输入，那么必须实现 IInputObject 接口，		// 而该接口是被 IE 的 IInputObjectSite 调用的，因此在你的对象		// 中，应该保存 IInputObjectSite 的接口指针。		// 在类的头文件中，定义：		// CComQIPtr< IInputObjectSite, &IID_IInputObjectSite > m_spSite;		m_spSite = pUnkSite;	// 保存 IInputObjectSite 指针		if( !m_spSite )		return E_FAIL;		// 你需要控制 IE 的主框架吗？		// 那么在类的头文件中，定义：		// CComQIPtr< IWebBrowser2, &IID_IWebBrowser2 > m_spFrameWB;		// 然后，先取得 IServiceProvider,再取得 IWebBrowser2		CComQIPtr < IServiceProvider, &IID_IServiceProvider> spSP(pUnkSite);		if( !spSP )	return E_FAIL;		spSP->QueryService( SID_SWebBrowserApp, &m_spFrameWB );		if( !m_spFrameWB)	return E_FAIL;		// 如果你取得了 IE 主框架的 IWebBrowser2 指针		// 那么，当它发生了什么事情，你难道不想知道吗？		// 定义：CComPtr m_spCP;		CComQIPtr< IConnectionPointContainer,			&IID_IConnectionPointContainer> spCPC( m_spFrameWB );		if( spCPC )		{			spCPC->FindConnectionPoint( DIID_DWebBrowserEvents2, &m_spCP );			if( m_spCP )			{				m_spCP->Advise( reinterpret_cast< IDispatch * >( this ), &m_dwCookie );			}		}		// 咳~~~ 不说了，看源码去吧。这里能干的事情太多了... ...	}	return S_OK;}		

class ATL_NO_VTABLE Cxxx : 	......	public IDeskBand,	......{......BEGIN_COM_MAP(Cxxx)	......	COM_INTERFACE_ENTRY_IID(IID_IDeskBand, IDeskBand)	......END_COM_MAP()// IOleWindowSTDMETHODIMP Cxxx::GetWindow(HWND * phwnd){	// 取得 band 对象的窗口句柄	// m_hWnd 是建立窗口时候保存的	*phwnd = m_hWnd;		return S_OK;}STDMETHODIMP Cxxx::ContextSensitiveHelp(BOOL fEnterMode){	// 上下文帮助，参考 IContextMenu 接口	return E_NOTIMPL;}// IDockingWindowSTDMETHODIMP CVerticalBar::ShowDW(BOOL bShow){	// 显示或隐藏 band 窗口	if( m_hWnd )		::ShowWindow( m_hWnd, bShow ? SW_SHOW : SW_HIDE);	return S_OK;}STDMETHODIMP CVerticalBar::CloseDW(DWORD dwReserved){	// 销毁 band 窗口	if( ::IsWindow( m_hWnd ) )		::DestroyWindow( m_hWnd );	m_hWnd = NULL;    return S_OK;}STDMETHODIMP CVerticalBar::ResizeBorderDW(LPCRECT prcBorder, IUnknown* punkToolbarSite, BOOL fReserved){	// 当框架窗口的边框大小改变时	return E_NOTIMPL;}// IDeskBandSTDMETHODIMP CVerticalBar::GetBandInfo(DWORD dwBandID, DWORD dwViewMode,  DESKBANDINFO* pdbi){	         // 取得 band 的基本信息，你需要填写 pdbi 参数作为返回	if( NULL == pdbi )		return E_INVALIDARG;	// 如果将来需要调用 IOleCommandTarget::Exec() 则需要保存这2个参数	m_dwBandID = dwBandID;	m_dwViewMode = dwViewMode;	if(pdbi->dwMask & DBIM_MINSIZE)	{	// 最小尺寸		pdbi->ptMinSize.x = 10;		pdbi->ptMinSize.y = 10;	}	if(pdbi->dwMask & DBIM_MAXSIZE)	{	// 最大尺寸 (-1 表示 4G)		pdbi->ptMaxSize.x = -1;		pdbi->ptMaxSize.y = -1;	}	if(pdbi->dwMask & DBIM_INTEGRAL)	{		pdbi->ptIntegral.x = 1;		pdbi->ptIntegral.y = 1;	}	if(pdbi->dwMask & DBIM_ACTUAL)	{		pdbi->ptActual.x = 0;		pdbi->ptActual.y = 0;	}	if(pdbi->dwMask & DBIM_TITLE)	{	// 窗口标题		wcscpy(pdbi->wszTitle,L"窗口标题");	}	if(pdbi->dwMask & DBIM_MODEFLAGS)	{		pdbi->dwModeFlags = DBIMF_VARIABLEHEIGHT;	}	if(pdbi->dwMask & DBIM_BKCOLOR)	{	// 如果使用默认的背景色，则移除该标志		pdbi->dwMask &= ~DBIM_BKCOLOR;	}	return S_OK;}		

STDMETHODIMP CExplorerBar::UIActivateIO(BOOL fActivate, LPMSG pMsg){    if(fActivate)        SetFocus(m_hWnd);    return S_OK;}STDMETHODIMP CExplorerBar::HasFocusIO(void){    if(m_bFocus)        return S_OK;    return S_FALSE;}STDMETHODIMP CExplorerBar::TranslateAcceleratorIO(LPMSG pMsg){    return S_FALSE;}      

• DBID_BANDINFOCHANGED
  Band 的信息变化。设置参数 pvaIn 为 band ID， 该 ID 就是最近一次调用 GetBandInfo 所得到的值，容器会调用 band 对象的 GetBandInfo 函数来更新请求信息。
• DBID_MAXIMIZEBAND
  最大化 band。设置参数 pvaIn 为 band ID，该 ID 就是最近一次调用 ?GetBandInfo ?所得到的值。
• DBID_SHOWONLY
  打开或关闭容器中其它的 bands。 设置参数 pvaIn 为VT_UNKNOWN 类型，它可以是如下的值：
  　

  值	描述
  pUnk	band 对象的 IUnknown 指针，其它的桌面 bands 将被隐藏
  0	隐藏所有的桌面 bands
  1	显示所有的桌面 bands

  
  
• DBID_PUSHCHEVRON
  在菜单项左边显示“v”的选择标志。容器发送一个 RB_PUSHCHEVRON 消息，当 band 对象接收到通知消息 RBN_CHEVRONPUSHED 提示它显示一个"v"的标志。设置 IOleCommandTarget::Exec 函数中 nCmdExecOpt 参数为 band ID，该 ID 是最近一次调用 GetBandInfo ?所得到的值，设置 IOleCommandTarget::Exec 函数中 pvaIn 参数为 VT_I4 类型，这是应用程序定义的一个值，它通过通知消息 RBN_CHEVRONPUSHED 中lAppValue 回传给 band 对象。

3.4　Band 对象注册
　　Band 对象必须注册为一个 OLE 进程内的服务器，并且支持 apartment 线程公寓。注册表中默认键的值是表示菜单的文字。对于浏览器栏，它加到 IE 菜单的“查看\浏览器栏”中；对于工具栏 band ，它加到 IE 菜单的“查看\工具栏”中；对于桌面 band， 它加到系统任务栏的快捷菜单中。在菜单资源中，可以使用“&”指明加速键。

通常，一个基本的 band 对象的注册表项目是：

HKEY_CLASSES_ROOT
CLSID
{你的 band 对象的 CLSID}
　　(Default) = 菜单的文字
　　InProcServer32
　　　(Default) = DLL 的全路径文件名
　　　ThreadingModel= Apartment

工具栏 bands 还必须把它们的 CLSID 注册到 IE 的注册表中。

在 HKEY_LOCAL_MACHINE\Software\Microsoft\Internet Explorer\Toolbar 下给出 CLSID 作为键名，而其键值是被忽略的。

HKEY_LOCAL_MACHINE
Software
Microsoft
Internet Explorer
Toolbar
　　{你的 band 对象的 CLSID}

　　还有几个可选的注册表项目(例子程序并不是这样实现的)。比如，你想让浏览器栏显示 HTML 的话，必须要如下设置注册表：

HKEY_CLASSES_ROOT
CLSID
{你的 Band 对象的 CLSID}
Instance
CLSID
　　(Default) = {4D5C8C2A-D075-11D0-B416-00C04FB90376}

同时，如果要指定一个本地的 HTML 文件，那么要如下设置：

HKEY_CLASSES_ROOT
CLSID
{你的 Band 对象的 CLSID}
Instance
InitPropertyBag
　　Url

　　另外，还可以指定浏览器栏的宽和高，当然，它是依赖于这个栏是纵向还是横向的。其实这个项目无所谓，因为当用户调整了浏览器栏的大小后，会自动保存在注册表中的。

HKEY_CURRENT_USER
Software
Microsoft
Internet Explorer
Explorer Bars
{你的 Band 对象的 CLSID}
　　BarSize

　　BarSize 键的类型必须是 REG_BINARY 类型，它有8个字节。左起前4个字节，是用16进制表示的像素宽度或高度，后4个字节保留，你应该设置为0。下面是一个可以在浏览器栏上显示 HTML 文件的全部注册表项目的例子，默认宽度为291（0x123）个像素点：

HKEY_CLASSES_ROOT
CLSID
{你的 Band 对象的 CLSID}
　(Default) = 菜单文字
　InProcServer32
　　(Default) = DLL 的全路径文件名
　　ThreadingModel= Apartment
Instance
CLSID
　　(Default) = {4D5C8C2A-D075-11D0-B416-00C04FB90376}
InitPropertyBag
　　Url= 你的 HTML 文件名

HKEY_CURRENT_USER
Software
Microsoft
Internet Explorer
Explorer Bars
{你的 Band 对象的 CLSID}
　　BarSize= 23 01 00 00 00 00 00 00

　　对于注册表的设置，用 ATL 实现其实是异常简单的。打开工程的 xxx.rgs 文件，并手工编辑一下就可以了。 下面这个文件源码，是例子程序中 IE 工具栏的注册表样式，HKLM 是需要手工添加的，因为它不使用组件类型方式注册。而对于其它类型的 band 对象只要在类声明中添加：

BEGIN_CATEGORY_MAP(Cxxx)			// 向注册表中注册 COM 类型	IMPLEMENTED_CATEGORY(CATID_InfoBand)	// 垂直样式的浏览器栏END_CATEGORY_MAP()		

HKCR	// 这个项目是 ATL 帮你生成的，你只要手工修改“菜单上的文字”就可以了{	Bands.ToolBar.1 = s ''ToolBar Class''	{		CLSID = s ''{ 你的 CLSID }''	}	Bands.ToolBar = s ''ToolBar Class''	{		CLSID = s ''{ 你的 CLSID }''		CurVer = s ''Bands.ToolBar.1''	}	NoRemove CLSID	{		ForceRemove { 你的 CLSID } = s ''用在菜单上的文字(&T)''		{			ProgID = s ''Bands.ToolBar.1''			VersionIndependentProgID = s ''Bands.ToolBar''			ForceRemove ''Programmable''			InprocServer32 = s ''%MODULE%''			{				val ThreadingModel = s ''Apartment''			}			''TypeLib'' = s ''{xxxx-xxxx-xxxxxxxxxxxxxxx}''		}	}}HKLM	// 这个项目是手工添加的IE工具栏所特有的{	Software	{		Microsoft		{			''Internet Explorer''			{				NoRemove Toolbar				{					ForceRemove val { 你的 CLSID } = s ''随便给个说明性文字串''				}			}		}	}}		

• 拖放网页链接：通常是在新窗口中打开
• 拖放选中的文字：保存文字、作为关键字通过搜索引擎搜索网络、作为Url打开等
• 拖放图片：通常是保存图片到指定文件夹
• 当然，还有很关键的一点：拖动对象时鼠标指针反馈不同的拖拽效果

• 文字在页面内与输入框之间的交互拖放（这一点最为重要）
• 来自外部的文字与网页输入框之间的交互拖放
• 拖拽时滚动页面（这一点是被忽略了）

IDocHostUIHandler::GetDropTarget Method——Called by MSHTML when it is used as a drop target. This method enables the host to supply an alternative IDropTarget interface.

STDMETHODIMP CHtmlControlSite::XDocHostUIHandler::GetDropTarget(

LPDROPTARGET pDropTarget, LPDROPTARGET* ppDropTarget)

{

METHOD_PROLOGUE_EX_(CHtmlControlSite, DocHostUIHandler)

*ppDropTarget = g_pDropTarget;//将自定义的实现告知MSHTML引擎

return S_OK;

}

IHTMLDataTransfer Members

clearData——Removes one or more data formats from the clipboard through dataTransfer or clipboardData object.

dropEffect——Sets or retrieves the type of drag-and-drop operation and the type of cursor to display.

effectAllowed——Sets or retrieves, on the source element, which data transfer operations are allowed for the object.

getData——Retrieves the data in the specified format from the clipboard through the dataTransfer or clipboardData objects.

setData——Assigns data in a specified format to the dataTransfer or clipboardData object.

HRESULT CHtmlDocument2::OnInvoke(DISPID dispidMember, REFIID riid, LCID lcid, WORD wFlags,

DISPPARAMS * pdispparams, VARIANT * pvarResult,EXCEPINFO * pexcepinfo,

UINT * puArgErr)

{

......

//如果只是要设置鼠标拖拽效果的话，这个事件可以不处理

case DISPID_HTMLELEMENTEVENTS_ONDRAGSTART :

{

OnDragStart();

break ;

}

//重点在这里

case DISPID_HTMLELEMENTEVENTS_ONDRAGOVER :

{

OnDragOver();

break ;

}

case DISPID_HTMLELEMENTEVENTS_ONDROP :

{

OnDrop();

break ;

}

......

}

 

void CHtmlDocument2::OnDragOver( void )

{

SetDragEffect();               //设置鼠标拖拽效果

}

 

void CHtmlDocument2::SetDragEffect( void )

{

CComQIPtr<IHTMLWindow2>  pWindow;

CComQIPtr<IHTMLEventObj>  pEventObj;

CComQIPtr<IHTMLEventObj2>  pEventObj2;

CComQIPtr<IHTMLElement>  pElement;

 

HRESULT hr = m_spHtmlObj->get_parentWindow( &pWindow );

hr = pWindow->get_event( &pEventObj );

 

//ondragover发生时IE的默认行为是“没有鼠标拖拽效果”。

//将IHTMLEventObj的返回值设为false即可取消该事件的默认行为，所以执行完下面这句话，拖拽效果就出现了。

AllowDisplayDragCursor(pEventObj, FALSE);  

 

CComBSTR bstrTagName;

pEventObj->get_srcElement(&pElement);    //获得当前HTML Element

pElement->get_tagName(&bstrTagName);    

if ( IsEditArea(bstrTagName) ) //根据Tag Name判断是否鼠标位于输入框，以便设置焦点使得光标随鼠标移动

{

CComQIPtr<IHTMLElement2>  pElement2;

if ( SUCCEEDED(pElement->QueryInterface(IID_IHTMLElement2, (void **) &pElement2 ))

&& pElement2 )

{

pElement2->focus();

}

//默认情况下，当拖拽文档到输入框时，鼠标会变成拖拽的光标，所以这里使用IE的默认行为。

AllowDisplayDragCursor(pEventObj, TRUE);

}

}

 

BOOL CHtmlDocument2::IsEditArea(CComBSTR bstrTagName)

{

return bstrTagName == "INPUT" || bstrTagName == "TEXTAREA";

}

 

void CHtmlDocument2::AllowDisplayDragCursor(CComQIPtr<IHTMLEventObj> pEventObj, BOOL bAllow)

{

VARIANT v;

v.vt = VT_BOOL;

 

v.boolVal = !bAllow ? VARIANT_FALSE : VARIANT_TRUE;

pEventObj->put_returnValue(v);

}

 

void CHtmlDocument2::OnDrop( void )

{

CComQIPtr<IHTMLWindow2>  pWindow;

CComQIPtr<IHTMLEventObj>  pEventObj;

CComQIPtr<IHTMLEventObj2>  pEventObj2;

CComQIPtr<IHTMLElement>  pElement;

CComQIPtr<IHTMLDataTransfer>   pdt; //此处演示如何使用IHTMLDataTransfer

 

HRESULT hr = m_spHtmlObj->get_parentWindow( &pWindow );

hr = pWindow->get_event( &pEventObj );

hr = pEventObj->QueryInterface(IID_IHTMLEventObj2, (void **) &pEventObj2 );

hr = pEventObj2->get_dataTransfer(&pdt);

 

CComBSTR bstrFormat = "URL"; //首先尝试获取URL

VARIANT Data;

hr = pdt->getData(bstrFormat, &Data);

if ( Data.vt != VT_NULL )

{     //获取成功，拖放的对象是Url

DoOpenUrl(CString(Data.bstrVal));

}

else

{     //否则尝试获取选中的文本

bstrFormat = "Text";

hr = pdt->getData(bstrFormat, &Data);

if ( Data.vt != VT_NULL )

{     //获取成功，拖放的内容是文本

CComBSTR bstrTagName;

pEventObj->get_srcElement(&pElement);

pElement->get_tagName(&bstrTagName);

if ( IsEditArea(bstrTagName) )

{

//Drop target是输入框，不做任何操作，由IE进行默认处理

return ;

}

else

{     //否则我们自己处理文本，或保存，或检测是否链接后打开，等等

DoProcessText(CString(Data.bstrVal));

//Process the text

}

}

else

{     //既不是链接，也不是文本，可认为是来自外部（如Windows Shell）的文件拖放

DoOnDropFiles(pdt);

}

}

}

 

//演示如何从IHTMLDataTransfer得到IDataObject

void CHtmlDocument2::DoOnDropFiles(CComQIPtr<IHTMLDataTransfer> pDataTransfer)

{

CComQIPtr<IServiceProvider>  psp;

CComQIPtr<IDataObject>  pdo;

if ( FAILED(pDataTransfer->QueryInterface(IID_IServiceProvider, (void **) &psp)) )

{

return ;

}

if ( FAILED(psp->QueryService(IID_IDataObject, IID_IDataObject, (void **) &pdo)) )

{

return ;

}

 

COleDataObject DataObject;

DataObject.Attach(pdo);

......

}

//构造函数，传入参数即是从GetDropTarget得到的那个pDropTarget，它是MSHTML的缺省实现

CBrowserDropTarget::CBrowserDropTarget(IDropTarget *pOrginalDropTarget)

:  m_bDragTextToInputBox(FALSE)

//这个布尔变量用来判断是否正在向InputBox拖拽文字

,  m_pOrginalDropTarget(pOrginalDropTarget)

//m_pOrginalDropTarget用来保存MSHTML的缺省实现

{

}

 

STDMETHODIMP CBrowserDropTarget::DragEnter(/* [unique][in] */IDataObject __RPC_FAR *pDataObj,

/* [in] */ DWORD grfKeyState,

/* [in] */ POINTL pt,

/* [out][in] */ DWORD __RPC_FAR *pdwEffect)

{

//调用缺省的行为

return m_pOrginalDropTarget->DragEnter(pDataObj, grfKeyState, pt, pdwEffect);

}

 

STDMETHODIMP CBrowserDropTarget::DragOver(/* [in] */ DWORD grfKeyState,

/* [in] */ POINTL pt,

/* [out][in] */ DWORD __RPC_FAR *pdwEffect)

{

//在网页内拖拽文字时这个值是DROPEFFECT_COPY（拖拽的文字不属于输入框中）

//或DROPEFFECT_COPY | DROPEFFECT_MOVE（拖拽的文字是输入框中的文字）

DWORD dwTempEffect = *pdwEffect;

 

//接下来调用IE的缺省行为

HRESULT hr = m_pOrginalDropTarget->DragOver(grfKeyState, pt, pdwEffect);

 

//判断是否是往输入框拖拽文字

m_bDragTextToInputBox = IsDragTextToInputBox(dwOldEffect, *pdwEffect);

if ( !m_bDragTextToInputBox )

{

//不是往输入框拖拽文字，则使用原始的拖拽效果。否则和IE的缺省效果一样——也就是没有效果

*pdwEffect = dwTempEffect;

}

return S_OK;

}

 

//根据调用缺省行为前后的Effect值判断是否是往输入框拖拽文字

BOOL CBrowserDropTarget::IsDragTextToInputBox(DWORD dwOldEffect, DWORD dwNewEffect)

{

//如果是把非输入框中文字往输入框拖动，则dwOldEffect与dwNewEffect相等，都是DROPEFFECT_COPY

BOOL bTextSelectionToInputBox = ( dwOldEffect == DROPEFFECT_COPY )

&& ( dwOldEffect == dwNewEffect );

 

//如果是把文字从一个输入框拖到另一个输入框，则dwOldEffect为DROPEFFECT_COPY | DROPEFFECT_MOVE，

//而dwNewEffect的值可能为DROPEFFECT_MOVE（默认情况），也可能为DROPEFFECT_COPY（按下Ctrl键时）

BOOL bInputBoxToInputBox = ( dwOldEffect == (DROPEFFECT_COPY | DROPEFFECT_MOVE) )

&& ( dwNewEffect == DROPEFFECT_MOVE || dwNewEffect == DROPEFFECT_COPY );

 

//来自Microsoft Word的拖拽特殊一些，dwOldEffect是所有效果的组合值

BOOL bMSWordToInputBox =

( dwOldEffect == (DROPEFFECT_COPY | DROPEFFECT_MOVE | DROPEFFECT_LINK) )

&& ( dwNewEffect == DROPEFFECT_MOVE || dwNewEffect == DROPEFFECT_COPY );

 

//来自Edit Plus的拖拽过也特殊一些，dwOldEffect是个负数（怀疑是Edit Plus的拖拽实现有问题）

BOOL bEditPlusToInputBox = ( dwOldEffect < 0 )

&& ( dwNewEffect == DROPEFFECT_MOVE || dwNewEffect == DROPEFFECT_COPY );

 

//也许还有些例外，可再添加

......

return bTextSelectionToInputBox || bInputBoxToInputBox || bMSWordToInputBox || bEditPlusToInputBox;

}

 

STDMETHODIMP CBrowserDropTarget::DragLeave()

{

//调用缺省的行为

return m_pOrginalDropTarget->DragLeave();

}

 

STDMETHODIMP CBrowserDropTarget::Drop(/* [unique][in] */ IDataObject __RPC_FAR *pDataObj,

/* [in] */ DWORD grfKeyState,

/* [in] */ POINTL pt,

/* [out][in] */ DWORD __RPC_FAR *pdwEffect)

{

if ( m_bDragTextToInputBox )

{

//是文字拖放，调用IE的缺省行为

return m_pOrginalDropTarget->Drop(pDataObj, grfKeyState, pt, pdwEffect);

}

 

//否则是拖放链接、图片、文件等，按常规的IDataObject处理方式

......

return S_OK;

}

1. 文字在页面内与输入框之间能够交互拖放。
2. 来自外部的文字与网页输入框之间也能交互拖放
3. 拖拽时能够自动滚动页面

Trackback: http://tb.blog.csdn.net/TrackBack.aspx?PostId=677425

#include "HtmlObj.h"

 

class CHtmlAnchorElement : public CHtmlObj<IHTMLAnchorElement,

&DIID_HTMLAnchorEvents> 

{

public:

CHtmlAnchorElement(CHtmlDocument2* pParentDoc2);

virtual ~CHtmlAnchorElement();

 

virtual HRESULT OnInvoke(DISPID dispidMember,REFIID riid,

LCID lcid, WORD wFlags,

DISPPARAMS * pdispparams, VARIANT * pvarResult,

EXCEPINFO * pexcepinfo,

UINT * puArgErr);

};

HRESULT CHtmlAnchorElement::OnInvoke(DISPID dispidMember,

REFIID riid, LCID lcid, WORD wFlags,

DISPPARAMS * pdispparams, VARIANT * pvarResult,

EXCEPINFO * pexcepinfo,

UINT * puArgErr)

{

HRESULT hr = E_NOTIMPL;

switch(dispidMember)

{

case DISPID_HTMLELEMENTEVENTS_ONMOUSEOVER :

{//当鼠标经过链接时，我们在这里获得通知

hr = S_OK;

      // TODO: add code to handle on mouse over events

break;

}

case DISPID_HTMLELEMENTEVENTS_ONMOUSEOUT :

{//当鼠标从链接上移开时，我们在这里获得通知，其它的Dispatch ID可根据需要添加

hr = S_OK;

      // TODO: add code to handle on mouse out events

break;

}

default:

{

break;

}

}

 

return hr;

}

template<class THtmlElement> class CHtmlElements

{

typedef CMap<LPDISPATCH, LPDISPATCH, THtmlElement*, THtmlElement*> CMapDispToHtmlElement;

CMapDispToHtmlElement m_htmlElements;

BOOL IsSiteConnected( LPDISPATCH pDisp )

{

THtmlElement *pElement;

return m_htmlElements.Lookup( pDisp, pElement );

}

public :

CHtmlElements( void )

{

}

~CHtmlElements( void )

{

}

public :

void SetSite( LPDISPATCH pDisp )

{

if ( IsSiteConnected( pDisp ) ) //检查以避免多余的Sink

{

return ;

}

THtmlElement *pElement = new THtmlElement; //通过模板类型创建相应的类的实例进行连接

pElement->SetSite( pDisp );

m_htmlElements.SetAt( pDisp, pElement );

}

 

//在合适的地方调用Clear释放所管理的内存

void Clear(void)

{

POSITION pos = m_htmlElements.GetStartPosition();

THtmlElement *pElement = NULL;

LPDISPATCH pDisp = NULL;

while (pos != NULL)

{

m_htmlElements.GetNextAssoc( pos, pDisp, pElement );

m_htmlElements.RemoveKey( pDisp );

delete pElement;

}

}

};

typedef CHtmlElements<CHtmlDocument2> CHtmlDocuments;

typedef CHtmlElements<CHtmlAnchorElement> CHtmlAnchors;

 

class CMyView : public CHtmlView

{

private :

CHtmlDocuments m_htmlDocs;

CHtmlAnchors m_htmlAnchors;

}

void CMyView ::OnDocumentComplete(LPDISPATCH pDisp, LPCTSTR lpszURL)

{

m_htmlDocs.SetSite(pDisp);

}

Trackback: http://tb.blog.csdn.net/TrackBack.aspx?PostId=621961

1、概述

　　Internet Explorer强大而方便的可编程能力和可扩展能力为其抢占浏览器市场可谓是立下了汗马功劳。可编程主要体现两方面：

• 实现浏览功能的部分被包装成一个控件——WebBrowser Control，开发人员可以在自己的应用程序中嵌入它从而使程序具有访问Internet上网页的能力，同时WebBrowser Control也能够被灵活地自定义以满足不同的需要。
• 可对Microsoft Internet Explorer应用程序本身嵌入的浏览器控件编程，一般通过BHO（Browser Helper Object）来实现。

　　可扩展能力则体现在几个方面：

• 嵌入式面板型扩展，包括Explorer Bars（如收藏夹、搜索、历史等嵌入IE主窗口的大型面板）, Tool Bands（如Google Toolbar、MSN Toolbar等嵌入IE的工具条）, 和Desk Bands（如快速启动这类嵌入任务栏的面板，实际上是Explorer外壳的扩展）。这几种面板的编写方法相差无几，不同之处主要在于向系统注册方式的不同。

• 是参数型扩展，包括为浏览器增加上下文菜单项（调用脚本）、为浏览器主菜单增加菜单项、为浏览器“标准按钮”工具条添加按钮等。
• 其他扩展，如文件下载的扩展（Custom Download Manager）、地址栏扩展（搜索扩展）等。

　　随着IE的发展，各种类型的扩展遍地开花，其中最为引人注目的，当属地址栏扩展和工具条扩展（几乎成了兵家必争之地）。本文讨论的主题，正是工具条的扩展。

2、问题的提出

　　两个原因促成了Google Toolbar的流行，一是广告窗口的泛滥、二是Google Search。Google“简单”（实则一点都不简单，没有搜索引擎的强力支持，Toolbar的用途就大受限制）地抓住了这两点，迅速占领了市场。

　　插件的一大好处在于可以不修改主程序，只需换一个样子差不多但功能更强的东西就可以使得整个应用程序功能增强，所以IE不升级大家也觉得Google Toobar越来越好用。于是利用WebBroser Control编写浏览器的开发人员就想，如果能像IE一样支持上述这些扩展，不就能把Google Toolbar拿过来用了吗？其他的事交给Google去做就行了。这就是我们要讨论的问题，“如何在自己的浏览器中嵌入Google Toolbar”。

3、分析

　　微软并未在MSDN中说明如何将Google Toolbar这类IE的工具条插件嵌入自己的应用程序，但其基于COM的设计方法实际上给予了我们这个能力（创建嵌入式的工具条的方法并不是本文的重点，此处略去，有兴趣的朋友可以参考MSDN）。我们知道，除了IUnknown接口外，Bands和Bars（以下简称Band对象）还需要实现三个接口：IObjectWithSite，IPersistStream和IDeskBand。当用户选择工具条或面板时，其容器（如IE的外壳框架）就会调用Band对象的IObjectWithSite::SetSite方法（该方法仅需要一个IUnknown类型的指针），将自己实现的IUnknown指针传递给Band对象。这就是整个插件开始真正激活的入口，也是我们的着手点。

　　MSDN中说到，一般来说，Band对象对于SetSite方法的实现需要完成以下几件事：

1. 如果当前Band对象持有另外的Site指针，则首先释放该指针。
2. 如果容器向SetSite方法传入的是一个空指针，则表示要删除该Band对象，此时SetSite返回S_OK即可。
3. 如果容器传入的不是空指针，则需要设置新的Site：
   1. 对此IUnknown指针所指的新Site调用QueryInterface查询得到其IOleWindow接口。
   2. 调用得到的IOleWindow接口的GetWindow方法获取父窗口的句柄（此窗口即是Band对象的栖身之处）并保存下来。如果以后不会再用到IOleWindow接口的话就对其调用Release。
   3. 现在可以创建Band对象的窗口了，当然，要以第2步得到的窗口为父窗口来创建，并且该窗口目前只能以不可见状态存在。
   4. 如果Band对象实现了IInputObject接口，即需要接收键盘输入，则还需要向容器传来的Site查询（QueryInterface）IInputObjectSite接口，此接口指针也需要保存下来。
   5. 上述步骤完成后即可返回S_OK，否则应返回OLE-defined的error code告知容器什么地方出了错。

　　显然，就我们要讨论的问题而言，只需换个角度（编写IE外壳的的角度）来考虑即可。首先，我们需要一个IUnknown接口（即Band对象所需的Site），其次需要一个IInputObjectSite接口，用以和Band对象的IInputObject接口交互，处理输入焦点转移的情况。接下来就可以通过Band对象的IDeskBand接口来显示、隐藏Band对象了（注意IDeskBand接口派生自IDockingWindow接口,后者又派生自IOleWindow接口）。

4、实现

　　实现分为两个部分，其一是一个简单的类，用以模拟IE外壳，我取名为CIESimulator。其二是一个管理IE扩展的类CIEBandPlugInManager，用以管理Band对象的方方面面。

class CIESimulator : public IInputObjectSite

{

private:

IWebBrowser2 *m_pwb; //保存WebBrowser Control的接口指针

public:

CIESimulator(void){};

~CIESimulator(void){};

 

void SetIWebBrowser2(IWebBrowser2* pwb);

 

//IUnknown methods

STDMETHODIMP QueryInterface(REFIID, void **);

STDMETHODIMP_(ULONG) AddRef(void);

STDMETHODIMP_(ULONG) Release(void);

 

//IInputObjectSite specific methods

STDMETHOD(OnFocusChangeIS)(THIS_ IUnknown* punkObj, BOOL fSetFocus);

};

 

//IUnknown methods

STDMETHODIMP CIESimulator::QueryInterface( REFIID riid, void **ppv )

{

if ( riid == IID_IInputObjectSite )  //这个接口需要自己处理

{

*ppv = static_cast<IInputObjectSite*>(this);

}

else if ( m_pwb )  //其它的交给WebBrowser Control去处理

{

m_pwb->QueryInterface( riid, ppv );

}

return S_OK;

}

 

//IInputObjectSite specific methods

STDMETHODIMP CIESimulator::OnFocusChangeIS(IUnknown* punkObj, BOOL fSetFocus)

{

return S_OK;  //此处我们简单地返回

}

 

void CIESimulator::SetIWebBrowser2(IWebBrowser2* pwb)

{

m_pwb = pwb;

}

　　注意这里我们并没有实现IOleWindow接口来向Band对象传递父窗口对象（窗口的宿主可以更改，所以Band对象创建的窗口的父窗口我们并不关心，Band对象查询IOleWindow接口的动作实际上是向WebBrowser Control查询），而是在稍后的CIEBandPlugInManager类中通过调用IDeskBand的GetWindow方法获得Band对象的窗口句柄，再手动将其嵌入我们指定的窗口中。

　　首先我们定义一个结构用以保存Band的信息：

enum eBANDTYPE

{

btVertical = 0,

btHorizontal = 1

};

 

enum eBANDSTATE

{

bsUnInitialized = -1,

bsVisible = 0,

bsInVisible = 1,

bsUnLoaded = 2

};

 

typedef struct tagIEBANDINFO

{

char

 

szCLSID[39];

char

 

szName[MAX_PATH];

IUnknown

*puk;

HWND

 

hBand;

UINT

 

uMinHeight;

UINT

 

uBandID;

eBANDTYPE

eBandType;

eBANDSTATE

eBandState;

} IEBANDINFO, *LPIEBANDINFO;

　　再用一个函数来获取所有Band的信息（以下代码为示例，具体实现是可从注册表把所有Band的信息一一读出）

void CIEBandPlugInManager::GetAllBandCLSID(void)

{

LPIEBANDINFO pIEBandInfo;

 

pIEBandInfo = new IEBANDINFO();

strcpy( pIEBandInfo->szCLSID, "{2318C2B1-4965-11d4-9B18-009027A5CD4F}\0");  //Google Toolbar的CLSID

strcpy( pIEBandInfo->szName, GetDisplayName(pIEBandInfo->szCLSID) );

pIEBandInfo->uMinHeight = 22;

pIEBandInfo->uBandID = m_BandCtrlID++;

pIEBandInfo->eBandType = btHorizontal;

pIEBandInfo->eBandState = bsUnInitialized;

m_oaBand.Add( (CObject*)pIEBandInfo );//m_oaBand是一个CObArray

｝

 

//根据CLSID从注册表获取Band的名称

CString CIEBandPlugInManager::GetDisplayName(CString strCLSID)

{

TCHAR

 

sz[MAX_PATH];

HKEY

 

hKey;

DWORD

 

dwSize;

 

strCLSID = "CLSID\\" + strCLSID;

if(RegOpenKey(HKEY_CLASSES_ROOT, strCLSID, &hKey) != ERROR_SUCCESS)

{

return _T("");

}

 

RegQueryValueEx(hKey, NULL, NULL, NULL, (LPBYTE)sz, &dwSize);

RegCloseKey(hKey);

 

return sz;

}

 

//通过Band的CLSID激活Band

bool CIEBandPlugInManager::ActivateBand( CString strCLSID )

{

LPIEBANDINFO pIEBandInfo = GetBandInfo( strCLSID ); //从m_oaBand中找到符合条件的Band的信息

if ( !pIEBandInfo )

{

return false;

}

 

WCHAR wsz[MAX_PATH]; 

::MultiByteToWideChar(CP_ACP, 0, strCLSID, -1, wsz, MAX_PATH);

 

CLSID

clsid;

HRESULT hr2 = CLSIDFromString( wsz, &clsid);

if ( hr2 != NOERROR )

return false;

 

HRESULT hr = ::CoCreateInstance(clsid, NULL, LSCTX_INPROC_SERVER, IID_IUnknown, (void**)&pIEBandInfo->puk); //创建Band对象的实例

IUnknown* puk = pIEBandInfo->puk;

if (FAILED(hr))

return false;

 

DoQueryBandInfo( pIEBandInfo );  //查询Band对象实例的信息

 

switch( pIEBandInfo->eBandType )

{

case btVertical:

break;

//我们不处理Vertical的面板

case btHorizontal:

{

g_pMainFrame->m_wndReBar.AddBar2( pIEBandInfo->hBand, pIEBandInfo->uBandID, pIEBandInfo->uMinHeight, 0, 0); //将Band嵌入主窗口的ReBar中

 

REBARBANDINFO rbbi;

rbbi.cbSize = sizeof(rbbi);

rbbi.fMask = RBBIM_CHILDSIZE | RBBIM_IDEALSIZE | RBBIM_SIZE;

rbbi.cxMinChild = 0;

rbbi.cyMinChild = pIEBandInfo->uMinHeight;

rbbi.cx = rbbi.cxIdeal = 250;

UINT nCount = g_pMainFrame->m_wndReBar.GetReBarCtrl().GetBandCount();

g_pMainFrame->m_wndReBar.GetReBarCtrl().SetBandInfo(nCount-1, &rbbi);

break;

}

default:

break;

}

pIEBandInfo->eBandState = bsVisible;

return true;

}

 

//查询Band对象实例的信息

void CIEBandPlugInManager::DoQueryBandInfo(LPIEBANDINFO pIEBandInfo)

{

IObjectWithSite *pOWS;

//查询IObjectWithSite接口

HRESULT hr = pIEBandInfo->puk->QueryInterface(IID_IObjectWithSite, (void**)&pOWS);

if (SUCCEEDED(hr))

{     //设置Site

pOWS->SetSite( (IUnknown *)&m_IESimulator ); //m_IESimulator是CIESimulator的一个实例对象，对Band对象而言，它就像IE

}

 

IDeskBand *pdb;

hr = pIEBandInfo->puk->QueryInterface(IID_IDeskBand, (void**)&pdb);

if (SUCCEEDED(hr))

{     //查询得到Band对象窗口的句柄，稍候通过该句柄将Band对象的窗口嵌入我们指定的窗口

pdb->GetWindow(&pIEBandInfo->hBand);

}

 

ShowBand(pIEBandInfo, TRUE);//显示Band

}

 

bool CIEBandPlugInManager::ShowBand(LPIEBANDINFO pIEBandInfo, bool bShow)

{

IDockingWindow *pdw;

HRESULT hr = pIEBandInfo->puk->QueryInterface(IID_IDockingWindow, (void**)&pdw);

if (SUCCEEDED(hr))

{

pdw->ShowDW(bShow);

}

else

{

return false;

}

return true;

}

　　下面是我测试的一个截图，Google的搜索、广告窗口拦截均可正常工作。

5、总结

　　上述的原理看来很简单，但具体实现的时候仍然需要作较多的测试和考虑，Band对象的管理和缓存、接口的AddRef和Release等。时间有限，代码也很乱，不过只要原理交待清楚，相信会对有兴趣的朋友有所帮助。

6、参考资料

MSDN:《Creating Custom Explorer Bars, Tool Bands, and Desk Bands》

引用地址：《Internet Explorer编程简述（九）在自己的浏览器中嵌入Google工具条》

Trackback: http://tb.blog.csdn.net/TrackBack.aspx?PostId=550698

1、概述

Internet Explorer的浏览历史菜单在4.0版本开始出现，但直到5.5之前，微软都未公布用于访问浏览历史的COM接口，如今已是IE6.0大行其道的年代，用于访问浏览历史的接口也早已公布多时，本文的目的则是试图抛砖引玉，简单介绍用于访问浏览历史的Travel Log接口，并用一个小小的类CIETravelLog来实现对Travel Log的封装。

2、IOmHistory接口

在早些时候的MSDN中，我们能够查阅到关于浏览历史的接口仅有IOmHistory，而该接口实际上对应的是浏览器中可以通过脚本访问的“history”对象。对于“history”对象，MSDN中是这样说的：

For security reasons, the history object does not expose the actual URLs in the browser history. It does allow navigation through the browser history by exposing the back, forward, and go methods. A particular document in the browser history can be identified as an index relative to the current page. For example, specifying -1 as a parameter for the go method is the equivalent of clicking the Back button.

This object is available in script as of Microsoft Internet Explorer 3.0.

即为了安全的原因，IOmHistory接口仅提供了有限的几个方法来完成在浏览器中前进、后退等操作，并没有提供访问历史列表Url的能力。这也难怪，该接口在IE 3.0时代已经存在，而当时IE并不成熟，可编程能力也不甚强大。一直到IE 4.0通过与Windows 98捆绑销售一统天下之后，相关的文档才逐渐丰富，多窗口浏览器等基于Internet Explorer/WebBrowser Control的应用软件也才铺天盖地开来。但在IE 5.5接口公布之前，要完全模拟IE的Travel Log行为，并不是一件容易的事。最容易想到的方法就是在BeforeNavigate、DocumentComplete等事件发生之时记录/修改Url并加以保存（我在早些时候也这样做过），但是效果不甚理想，尤其是浏览包含Frame的网页时，处理更是麻烦。当然，要完全模拟亦非难事，只不过开发人员都知道微软公布接口是早晚的事，所以也没有人花大力气在模拟IE的Travel Log行为上。

3、Travel Log简介

Internet Explorer 5.5推出以后，Travel Log接口也就开始出现在MSDN中，它是专门为OLE嵌入WebBrowser Control的应用程序设计的，其目的是“提高和加强用户的访问日志体验”（improve and enhance the user's travel log experience）。事实上，稍后我会提到，Travel Log接口正日益成为应用程序中的重要接口之一。

微软公布的Travel Log共包含三个接口：ITravelLogStg, IEnumTravelLogEntry和ITravelLogEntry。

• ITravelLogStg——该接口提供了用于在Travel Log中添加、删除、枚举日志（浏览历史）的方法，本文需要用到的几个方法列举如下：

方法名     用途

EnumEntries 为访问日志项创建枚举器（IEnumTravelLogEntry接口指针）

GetRelativeEntry 返回一个日志项

TravelTo 访问一个日志项

• IEnumTravelLogEntry——该接口提供用于枚举日志项所必需的方法，本文只用到一个方法：

方法名     用途

Next   枚举下一个日志项（返回ITravelLogEntry接口指针）

• ITravelLogEntry——该接口只有两个方法，分别用于返回日志项的Title和Url：

方法名     用途

GetTitle 返回日志项的Title

GetURL 返回日志项的Url

接口准备好了，我们也就很容易得知它们之间的关系：

• 要得到相对于当前页面的日志项列表，首先应通过ITravelLogStg接口创建一个枚举器（IEnumTravelLogEntry接口）。
• 通过IEnumTravelLogEntry枚举器的Next方法枚举出一个个的日志项（ITravelLogEntry接口）。
• 由ITravelLogEntry接口获取日志项所代表的网页的Title和Url并加以处理。
• 访问相对于当前页面的某个日志项时，首先由ITravelLogStg的GetRelativeEntry方法根据与当前页的距离得到ITravelLogEntry接口，再将后者传入ITravelLogStg的TravelTo方法以达到访问日志项的目的（如前进和后退）。

也许不是太恰当，我对UML也不熟悉，借用一个伪UML序列图表示其关系如下：

4、封装Travel Log

接下来，我们就用一个简单的类来完成对Travel Log的封装。如下所示，tlogstg.h包含了Travel Log的相关接口声明，该头文件可以在Platform SDK中找到。

#include "tlogstg.h"

 

class CIETravelLog

{

private:

ITravelLogStg *m_pTravelLogStg;

IEnumTravelLogEntry *m_pEnumLogEntry;

ITravelLogEntry *m_pTravalLogEntry;

IWebBrowser2* m_pWebBrowser;

public:

CIETravelLog(void);

~CIETravelLog(void);

void SetWebBrowser(IWebBrowser2* pWebBrowser);

void BuildHistoryMenu(CMenu * pMenu, unsigned char nCount, bool bForward);

void TravelTo(int nPosition);

};

 

CIETravelLog::CIETravelLog(void)

: m_pTravelLogStg(NULL), m_pEnumLogEntry(NULL), m_pTravalLogEntry(NULL), m_pWebBrowser(NULL)

{

}

 

CIETravelLog::~CIETravelLog(void)

{

if ( m_pTravelLogStg != NULL )

{

m_pTravelLogStg->Release();

}

if ( m_pEnumLogEntry != NULL )

{

m_pEnumLogEntry->Release();

}

if ( m_pTravalLogEntry != NULL )

{

m_pTravalLogEntry->Release();

}

if ( m_pWebBrowser != NULL )

{

m_pWebBrowser->Release();

}

}

 

//将浏览器的IWebBrowser2接口指针赋予CIETravelLog的实例

void CIETravelLog::SetWebBrowser(IWebBrowser2* pWebBrowser)

{

if ( (m_pWebBrowser == pWebBrowser) || (m_pWebBrowser == NULL) )

{

return;

}

if ( m_pWebBrowser != NULL )

{

m_pWebBrowser->Release();

}

m_pWebBrowser = pWebBrowser;

 

IServiceProvider *pSP;

HRESULT hr = m_pWebBrowser->QueryInterface(IID_IServiceProvider, (LPVOID*)&pSP);

m_pWebBrowser->Release();

if (SUCCEEDED(hr))

{

hr = pSP->QueryService(SID_STravelLogCursor, IID_ITravelLogStg, (LPVOID*)&m_pTravelLogStg);

pSP->Release();

}

}

 

//创建浏览历史菜单，bForward指明是前进还是后退菜单

void CIETravelLog::BuildHistoryMenu(CMenu * pMenu, unsigned char nCount, bool bForward)

{

if ( m_pTravelLogStg == NULL )

{

return;

}

TLENUMF eFlag = bForward ? TLEF_RELATIVE_FORE : TLEF_RELATIVE_BACK;

if ( FAILED(m_pTravelLogStg->EnumEntries( eFlag, &m_pEnumLogEntry ) ) )

{

return;

}

 

ULONG uFetched;

int i=0;

if ( m_pEnumLogEntry !=NULL )

{

while ( SUCCEEDED( m_pEnumLogEntry->Next( 1, &m_pTravalLogEntry, &uFetched ) ) &&

m_pTravalLogEntry && i<10 )//我们最多只需要10条历史菜单，可根据实际情况修改

{

LPOLESTR pszTitle;

m_pTravalLogEntry->GetTitle( &pszTitle );

CString strTitle = pszTitle;

if ( bForward )

{

//ID_IEHISTORY_MIDDLE是预定义的某个菜单项ID，从该ID开始前后可以创建10个菜单项，参见下一节

pMenu->InsertMenu( 0, MF_STRING, ID_IEHISTORY_MIDDLE + ++i, strTitle );

}

else

{

pMenu->InsertMenu( 0, MF_STRING, ID_IEHISTORY_MIDDLE - ++i, strTitle );

}

CoTaskMemFree( pszTitle );

m_pTravalLogEntry->Release();

}

}

}

 

//根据与当前页面的相对距离来访问历史网页

void CIETravelLog::TravelTo(int nPosition)

{

if ( m_pTravelLogStg == NULL )

{

return;

}

if SUCCEEDED(m_pTravelLogStg->GetRelativeEntry( nPosition, &m_pTravalLogEntry ))

{

m_pTravelLogStg->TravelTo( m_pTravalLogEntry );

}

}

5、使用CIETravelLog

假设是在我们自己编写的多窗口浏览器中使用Travel Log。为简单起见，我们声明一个CIETravelLog的全局对象g_IETravelLog，以便在任何地方调用。然后在适当的地方，如CMainFrame的TBN_DROPDOWN消息（工具条菜单下拉消息）处理函数OnDropDown中，添加下面的代码，用以创建浏览历史菜单：

//GetActiveWebBrowserPtr返回活动的浏览器IWebBrowser2接口指针

IETravelLog.SetWebBrowser( GetActiveWebBrowserPtr );

//bForward为true则创建“前进”菜单，否则创建“后退”菜单

IETravelLog.BuildHistoryMenu( &Menu, 10, bForward);

以下定义为菜单项ID的范围，前后共可以容纳10个菜单项，可根据实际情况修改。

#define ID_IEHISTORY_FIRST  60200

#define ID_IEHISTORY_MIDDLE 60210

#define ID_IEHISTORY_LAST   60220

添加命令处理函数OnTravelHistoryUrl用以响应从ID_IEHISTORY_FIRST到ID_IEHISTORY_LAST的菜单命令。

ON_COMMAND_RANGE(ID_IEHISTORY_FIRST, ID_IEHISTORY_LAST, OnTravelHistoryUrl)

 

void CMainFrame::OnTravelHistoryUrl(UINT nID /* Command ID */)

{

//nID - ID_IEHISTORY_MIDDLE即为要访问的浏览历史到当前页面的距离

g_IETravelLog.TravelTo( nID - ID_IEHISTORY_MIDDLE );

}

6、再谈Travel Log

前面我提到“Travel Log接口正日益成为应用程序中的重要接口之一”，此处加以说明。从微软平台的开发模式及导向来看，基于Internet Explorer/WebBrowser Control的应用势必会成为主流。在下一代的操作系统Longhorn中，应用程序界面的描述将完全由XML的一个特化——XAML来完成，而XAML的解析将由浏览器完成。微软说未来应用程序的部署将会十分容易，本地应用和基于浏览器的应用之间的差异将会被逐渐淡化，而实现这一目标的一个重要表现就是，在将来的操作系统平台上，应用程序实际上时刻都将运行在Internet Explorer中，Internet Explorer在某种程度上来说变成了一个容器。

于是，扎根于Internet Explorer的Travel Log自然而然地就被整合到了我们的应用程序中。君不见，我们每天在资源管理器和浏览器上完成的工作，不就是在Travel Log中来来回回地跑吗？如果所有的应用程序都嵌入到Internet Explorer中运行，那么我们在应用程序中所作的操作便自然得到了记录，“前进”和“后退”也就很Easy了。

很多软件都已经或多或少地开始采用基于Internet Explorer的模式，如Microsoft Money、Microsoft Encarta、Visual Studio.net的安装程序等等，都是很好的范例。所以，就目前来说，将我们的应用程序按这种模式编写（可参考《利用浏览器实现程序界面与实现的分离》），不是可以早一点获得“访问日志的体验”吗？

何乐而不为。

Trackback: http://tb.blog.csdn.net/TrackBack.aspx?PostId=308620

Internet Explorer有实在太多没有公布的东西。上一篇文章《Internet Explorer 编程简述（六）自定义浏览器上下文菜单》提到的获取“编码”菜单的方法就是利用了浏览器的上层窗口“Shell DocObject View”的未公布的命令ID。本文将要介绍的是如何用这个ID把“编码”菜单放到我们自己的菜单中来（如工具条上的“编码”按钮的下拉菜单）。

#define SHDVID_GETMIMECSETMENU 27
......
CComPtr spCT;

hr = pcmdTarget->QueryInterface(IID_IOleCommandTarget, (void**)&spCT);
......
// Get the language submenu
hr = spCT->Exec(&CGID_ShellDocView, SHDVID_GETMIMECSETMENU, 0, NULL, &var);

2、原理

上面指向IOleCommandTarget接口的智能指针spCT是从IDocHostUIHandler::ShowContextMenu的参数pcmdTarget得到的，它其实也可以从HTML文档接口得到，这就是实现的关键。

3、实现

下面的代码演示了如何将“编码”菜单放置到我们自己的编码菜单上去。

void CMainFrame::OnDropDown( NMHDR* pNotifyStruct, LRESULT* pResult )

{

　const UINT CmdID_GetMimeSubMenu = 27;

　// Command ID for getting the Encoding submenu

　NMTOOLBAR* pNMToolBar = ( NMTOOLBAR* )pNotifyStruct;

　CMenu menu;

　CMenu* pPopup = 0;

　CMyHtmlView *pView = NULL;

　m_bIsEncodMenuPopup = false;//标志变量，用以在WM_INITMENUPOPUP消息处理函数中检查“编码”菜单

　switch ( pNMToolBar->iItem )

　{

　......
　case ID_VIEW_ENCODE://按下“编码”按钮

　{

　　m_bIsEncodMenuPopup = true;

　　VERIFY( menu.LoadMenu( IDR_ENCODE ) );//IDR_ENCODE是预置的“编码”菜单资源，内含任意一项占位用的菜单

　　CMyHtmlView = GetActiveMyHtmlView();//检查当前是否存在活动的浏览器视图窗口

　　if ( pView != NULL )

　　{

　　　LPDISPATCH lpDispatch =pView->GetHtmlDocument();//获得文档指针

　　　if ( lpDispatch != NULL )

　　　{

　　　　// Get an IDispatch pointer for the IOleCommandTarget interface.

　　　　IOleCommandTarget * pCmdTarget = NULL;

　　　　HRESULT hr = lpDispatch->QueryInterface(IID_IOleCommandTarget, (void**)&pCmdTarget);

　　　　if ( SUCCEEDED( hr ) )

　　　　{

　　　　　VARIANT varEncSubMenu;

　　　　　::VariantInit( &varEncSubMenu );

　　　　　hr = pCmdTarget->Exec( &::CGID_ShellDocView, CmdID_GetMimeSubMenu, OLECMDEXECOPT_DODEFAULT, NULL, &varEncSubMenu );

　　　　　if ( SUCCEEDED( hr ) )

　　　　　{

　　　　　　// 添加“编码”菜单

　　　　　　MENUITEMINFO miiEncoding;

　　　　　　::memset( &miiEncoding, 0, sizeof(MENUITEMINFO) );

　　　　　　miiEncoding.cbSize = sizeof(MENUITEMINFO);

　　　　　　miiEncoding.fMask = MIIM_SUBMENU;

　　　　　　miiEncoding.hSubMenu = reinterpret_cast< HMENU > (varEncSubMenu.byref);

　　　　　　menu.SetMenuItemInfo(0, &miiEncoding, TRUE);//丢掉设计时占位用的菜单，替换为“编码”菜单

　　　　　 }

　　　　}

　　　}

　　}

　　pPopup = menu.GetSubMenu( 0 );

　　break;

　}

　......

　}

　if ( pPopup != 0 )

　{

　　CRect rc;

　　::SendMessage( pNMToolBar->hdr.hwndFrom, TB_GETRECT, pNMToolBar->iItem, ( LPARAM )&rc );

　　rc.top = rc.bottom;

　　::ClientToScreen( pNMToolBar->hdr.hwndFrom, &rc.TopLeft() );

　　long lResult = pPopup->TrackPopupMenu( TPM_LEFTALIGN | TPM_LEFTBUTTON | TPM_RETURNCMD, rc.left, rc.top, this );

　　m_bIsEncodMenuPopup = false;

　　if ( pNMToolBar->iItem == ID_VIEW_ENCODE )

　　{

　　　//其余的事教给浏览器去做，参考《Internet Explorer 编程简述（五）调用IE隐藏的命令（中文版）》

　　　 CFindIEWnd FindIEWnd( pView->m_wndBrowser.m_hWnd, "Internet Explorer_Server");

　　　::SendMessage( FindIEWnd.m_hWnd, WM_COMMAND, MAKEWPARAM(LOWORD(lResult), 0x0), 0 );

　　}

　　else

　　{

　　　SendMessage( WM_COMMAND, MAKEWPARAM(LOWORD(lResult), 0x0), 0 );

　　}

　}

　*pResult = TBDDRET_DEFAULT;

}

void CMainFrame::OnInitMenuPopup(CMenu* pPopupMenu, UINT nIndex, BOOL bSysMenu)

{

　CMDIFrameWndEx::OnInitMenuPopup(pPopupMenu, nIndex, bSysMenu);

　if ( m_bIsEncodMenuPopup )

　{

　　//默认情况下“编码”的所有菜单项都是Disabled的，在此修改其状态为Enabled

　　for ( UINT i=0; i GetMenuItemCount(); i++ )

　　{

　　　pPopupMenu->EnableMenuItem( pPopupMenu->GetMenuItemID( i ), MF_ENABLED | MF_BYCOMMAND );

　　}

　}

}

这样一来，原本只在浏览器上下文菜单中出现的“编码”菜单就出现在了我们自己的工具条按钮下拉菜单上，无需更多的处理，菜单状态的改变，编码的设置等，一切都教给浏览器自己去完成了。

1、概述
Internet Explorer提供了非常开发的接口，使开发人员不仅可以把其浏览器核心嵌入应用程序，还可以通过各种接口以实现更深层的控制。本文就将介绍对浏览器进行高级控制的话题之一——自定义上下文菜单。

2、最简单的情况
自定义的IE及WebBrowser的上下文菜单，最简单的方式就是在注册表的HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt下添加自定义的键值，步骤如下：
1) 添加一个新的键，其名称即为将来显示在上下文菜单中的菜单项名称，如：
　HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\&Google Search
2) 将新增的键的默认值设置为一个包含脚本的网页的URL（或文件路径全名），该网页中的脚本将在用户点击上下文菜单中的“Google Search”后被浏览器执行。

3)在新增的键下还可以新建一个二进制值Contexts，用以指定我们新增的菜单项针对特定的网页对象是否出现，其取值可以是如下值的组合（逻辑或）

Context　　　　 Value
Default　　　　 0x1
Images　　　　　0x2
Controls　　　　0x4
Tables　　　　　0x8
Text selection　0x10
Anchor　　　　　0x20

4) 还可以建立一个DWORD类型的Flags项并将其值设置为0x01，这将使得前述脚本在一个模态窗口中执行，就好像是通过window.showModalDialog调用的，但不同的是在脚本中仍然可以访问window对象。
5) 实例脚本如下：

通过修改注册表自定义菜单的方法适用于Internet Explorer和WebBrowser，也具有良好的扩展性。但我们如果希望执行的是不仅仅是脚本，二是自己的程序中代码，这种方法就不适用了。

3、使用完全自定义的菜单
1) IDocHostUIhandler接口提供了一个ShowContextMenu方法，在需要显示上下文菜单之前，MSHTML引擎就会调用实现了IDocHostUIHandler接口的
宿主程序的ShowContextMenu方法。

HRESULTIDocHostUIHandler::ShowContextMenu(
　　DWORD dwID,
　　POINT *ppt,
　　IUnknown *pcmdtReserved,
　　IDispatch *pdispReserved
);

dwID参数的意义与Contexts的组合类似；ppt为菜单的弹出点屏幕坐标；pcmdtReserved接口指向 IOleCommandTarget接口，可用于检测网页对象的状态和执行命令等操作。pdispReserved在IE5以上版本中指向的是网页对象的 IDispatch接口，用以区分不同对象，比如我们可以这样来获得网页对象的指针：

IHTMLElement *pElem;
HRESULT hr;
hr = pdispReserved->QueryInterface(IID_IHTMLElement, (void**)pElem);
if(SUCCEEDED (hr)) {
　　BSTR bstr;
　　pElem->get_tagName(bstr);
　　USES_CONVERSION;
　　ATLTRACE("TagName:%s\n", OLE2T(bstr));
　　SysFreeString(bstr);
　　pElem->Release();
}

如果我们在该方法中返回S_OK，则告诉MSHTML我们将使用自己的菜单（界面），如果是S_FALSE，则弹出默认的菜单。

2) 实现
原理清楚之后，实现起来非常简单，和弹出一般的菜单没什么两样，举例如下，显示主框架的“文件菜单”：

HRESULT CMyHtmlView::OnShowContextMenu(DWORD dwID, LPPOINT ppt, IUnknown * pcmdtReserved, IDispatch *)
{
　// 载入主菜单
　HMENU hMenuParent = ::LoadMenu( ::AfxGetInstanceHandle(), MAKEINTRESOURCE(IDR_MAINFRAME) );
　if (hMenuParent)
　{
　　HMENU hMenu = ::GetSubMenu( hMenuParent, 0 ); // 取得“文件”子菜单
　　if (hMenu)
　　{
　　 // 显示菜单
　　　TrackPopupMenuEx( hMenu,
　　　　TPM_LEFTALIGN | TPM_TOPALIGN,
　　　　ppt->x,
　　　　ppt->y,
　　　　::AfxGetMainWnd()->m_hWnd,
　　　　NULL );
　　}
　　::DestroyMenu( hMenuParent );
　}
　return S_OK;
}

4、自定义标准上下文菜单
1) 原理
更多的时候我们希望能在浏览器原来菜单的基础上作一些修改，如删掉“查看源文件”，添加自己的菜单项，等等，而不是完全不要原始的菜单，怎么办呢？借助MSDN提供的例子，我们来看看：

HRESULT CBrowserHost::ShowContextMenu(DWORD dwID, POINT *ppt,IUnknown *pcmdTarget,IDispatch *pdispObject)
{
　#define IDR_BROWSE_CONTEXT_MENU 24641
　#define IDR_FORM_CONTEXT_MENU 24640
　#define SHDVID_GETMIMECSETMENU 27
　#define SHDVID_ADDMENUEXTENSIONS 53

　HRESULT hr;
　HINSTANCE hinstSHDOCLC;
　HWND hwnd;
　HMENU hMenu;

　CComPtr spCT;
　CComPtr spWnd;

　MENUITEMINFO mii = {0};
　CComVariant var, var1, var2;
　hr = pcmdTarget->QueryInterface(IID_IOleCommandTarget, (void**)&spCT);
　hr = pcmdTarget->QueryInterface(IID_IOleWindow, (void**)&spWnd);
　hr = spWnd->GetWindow(&hwnd);//取得浏览器窗口句柄
　hinstSHDOCLC = LoadLibrary(TEXT("SHDOCLC.DLL"));
　if (hinstSHDOCLC == NULL)
　{
　　// Error loading module -- fail as securely as possible
　　return;
　}
　hMenu = LoadMenu(hinstSHDOCLC, MAKEINTRESOURCE(IDR_BROWSE_CONTEXT_MENU));
　hMenu = GetSubMenu(hMenu, dwID);
　// Get the language submenu
　hr = spCT->Exec(&CGID_ShellDocView, SHDVID_GETMIMECSETMENU, 0, NULL, &var);
　mii.cbSize = sizeof(mii);
　mii.fMask = MIIM_SUBMENU;
　mii.hSubMenu = (HMENU) var.byref;
　// Add language submenu to Encoding context item
　SetMenuItemInfo(hMenu, IDM_LANGUAGE, FALSE, &mii);
　// Insert Shortcut Menu Extensions from registry
　V_VT(&var1) = VT_INT_PTR;
　V_BYREF(&var1) = hMenu;
　V_VT(&var2) = VT_I4;
　V_I4(&var2) = dwID;
　hr = spCT->Exec(&CGID_ShellDocView, SHDVID_ADDMENUEXTENSIONS, 0, &var1, &var2);
　// Remove View Source
　DeleteMenu(hMenu, IDM_VIEWSOURCE, MF_BYCOMMAND);//删除“查看源文件”菜单项
　// Show shortcut menu
　int iSelection = ::TrackPopupMenu(hMenu,
　　TPM_LEFTALIGN | TPM_RIGHTBUTTON | TPM_RETURNCMD ,//返回用户选择的菜单命令ID
　　ppt->x,
　　ppt->y,
　　0,
　　hwnd,
　　(RECT*)NULL);
　// Send selected shortcut menu item command to shell
　LRESULT lr = ::SendMessage(hwnd, WM_COMMAND, iSelection, NULL);//发送到Internet Explorer_Server进行内部处理。
　FreeLibrary(hinstSHDOCLC);
　return S_OK;
}

从 上面的例子我们看出，基本的方法就是根据“shdoclc.dll”文件中的菜单资源建立菜单，再通过来自pcmdTarget的 IOlcCommandTarget接口获得“编码”菜单以及HKEY_CURRENT_USER\Software\Microsoft\ Internet Explorer\MenuExt下的定义扩展菜单，然后以TPM_RETURNCMD标志调用TrackPopupMenu或 TrackPopupMenuEx弹出菜单，并将返回的菜单命令ID教给浏览器窗口进行处理。这种方法可以调用许多通过浏览器无法直接调用的命令和对话框 （参阅：《Internet Explorer 编程简述（五）调用IE隐藏的命令》）。

所以，我们只需要在弹出菜单之前做一些自定义操作即可达到修改默认菜单的目的，如上面代码中就用删除了“查看源文件”菜单项。

2) 问题
如果我们不仅仅是删除默认的菜单项或是修改了默认的菜单项，还添加了自己的菜单项，会出现什么情况呢？由于使用了类似于MFC中UpdateUI的机制，遇到不认识的CommandID，浏览器就会将其状态设置为Disabled，所以我们自己添加的菜单是无法被选择的。
可 以想到，如果把菜单状态设置为Enabled，并通过TPM_RETURNCMD标志调用TrackPopupMenu或 TrackPopupMenuEx，再把返回的命令ID教给合适的窗口（如主框架窗口）去处理不就行了。关键点就在于如何把菜单状态设置为 Enabled。

3) 实现
解决的办法是截获 WM_INITMENUPOPUP 消息，在菜单创建以后，尚未显示之前修改菜单项状态，那浏览器就没有办法了。截获WM_INITMENUPOPUP消息则可使用子类化（subclass）的技术，前面通过IOleWindow接口我们得到了浏览器窗口的句柄hwnd，则可以这样做：

HMENU g_hPubMenu = NULL;
WNDPROC g_lpPrevWndProc = NULL;

LRESULT CALLBACK CustomMenuWndProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
　if (uMsg == WM_INITMENUPOPUP)
　{
　　if (wParam == (WPARAM) g_hPubMenu)
　　{
　　　::EnableMenuItem( 自定义的菜单命令ID, MF_ENABLED | MF_BYCOMMAND );
　　　::CheckMenuItem( 自定义的菜单命令ID, MF_BYCOMMAND);
　　　return 0;
　　}
　}
　return CallWindowProc(g_lpPrevWndProc, hwnd, uMsg, wParam, lParam);
}

HRESULT CMyHtmlView::OnShowContextMenu(DWORD dwID, LPPOINT ppt,
LPUNKNOWN pcmdtReserved, LPDISPATCH pdispReserved)
{
//浏览器菜单句柄保存在g_hPubMenu中
......
// subclass浏览器窗口
g_lpPrevWndProc = (WNDPROC)::SetWindowLong(hwnd, GWL_WNDPROC, (LONG)CustomMenuWndProc);
//m_SubclassWnd.SubclassWindow( hwnd );//MFC中用此方法更简便

// Show shortcut menu
int iSelection = ::TrackPopupMenu(hSubMenu,
　TPM_LEFTALIGN | TPM_RIGHTBUTTON | TPM_RETURNCMD,
　ppt->x,
　ppt->y,
　0,
　hwnd,
　(RECT*)NULL);
// Unsubclass浏览器窗口
::SetWindowLong(hwnd, GWL_WNDPROC, (LONG)g_lpPrevWndProc);
g_lpPrevWndProc = NULL;
//m_SubclassWnd.UnsubclassWindow();

if (iSelection == 自定义的菜单命令ID )
{
　::SendMessage( ::AfxGetMainWnd()->m_hWnd, WM_COMMAND, MAKEWPARAM(LOWORD(lResult), 0x0), 0 );
}
else
{
　LRESULT lr = ::SendMessage(hwnd, WM_COMMAND, iSelection, NULL);
}
......
}

在MFC 中则更为方便，从CWnd继承一个窗口类，假设为CWebBrowserSubclassWnd，为CMyHtmlView添加一个 CWebBrowserSubclassWnd类型的成员变量m_SubclassWnd，在子类化和去除子类化时调用 m_SubclassWnd.SubclassWindow( hwnd )和m_SubclassWnd.UnsubclassWindow()即可。相应的WM_INITMENUPOPUP消息处理函数如下所示：

void CWebBrowserSubclassWnd::OnInitMenuPopup(CMenu* pPopupMenu, UINT nIndex, BOOL bSysMenu)
{
　CWnd::OnInitMenuPopup(pPopupMenu, nIndex, bSysMenu);

　pPopupMenu->EnableMenuItem( 自定义的菜单命令ID, MF_ENABLED | MF_BYCOMMAND );
　pPopupMenu->CheckMenuItem( 自定义的菜单命令ID, MF_BYCOMMAND);
}

下面的图片显示了将“文字大小”菜单项添加到“编码”菜单项的下面的效果。

5、新的问题
看完上面的代码，我们又自然地想到浏览器编程中的另一个问题，那就是“编码”菜单。我们指定，手动建立一个“编码”菜单是比较麻烦的事，而且很难做到与浏览器上下文菜单上的“编码”菜单一样的效果。何不使用上述的方法让浏览器自己建立“编码”菜单和处理相应的命令呢？

具体实现请看下一篇文章《Internet Explorer 编程简述（七）完美的“编码”菜单》

参考资料 ：
MSDN:Adding Entries to the Standard Context Menu
MSDN:How To Adding to the Standard Context Menus of the WebBrowser Control
MSDN:IDocHostUIHandler::ShowContextMenu Method
BeginThread.com:Custom WebBrowser Context Menus

　　2、契机

　　MSDN中有一篇叫“WebBrowser Customization”的文章，其中介绍了通过IDocHostUIHandler.ShowContextMenu方法自定义WebBrowser上下文菜单的方法。

其 原理是从“shdoclc.dll”的资源中创建菜单，作一些修改之后用TrackPopupMenu函数（注意在标志中包含 TPM_RETURNCMD）将菜单弹出，然后把返回的Command ID发送给“Internet Explorer_Server”窗口进行处理。

　　好，如果找到所有上下文菜单的Command ID，不就可以随时调用了？确实是这样的。

　　3、实现
　　用eXeScope之类应用程序资源探索器打开“shdoclc.dll”便可以在菜单资源下找到上下文菜单的设计，如下图：

　　我们要做的，就是将这些ID发送到“Internet Explorer_Server”窗口进行处理。问题是WebBrowser其实是一个OLE容器，我们使用的CHtmlView又是更外层的封装，他们 的m_hWnd成员变量并不是IE窗口的句柄，如何找到我们需要的句柄呢？请看下面的图：

　　根据图中显示的从属关系，顺藤摸瓜，最内层的窗口“Internet Explorer_Server”的句柄就是我们需要的东西。为了简化问题，我这里使用了来自MSDN Magazine资深专栏撰稿人Paul Dilascia的CFindWnd类，非常好用。

　　再写一个函数InvokeIEServerCommand，调用就很方便了，《Internet Explorer 编程简述（四）“添加到收藏夹”对话框》中最后给出的方法就是从这里来的。

　　4、Command IDs
　　对所有的Command ID逐一尝试后我们发现：
　　1)不是所有的Command ID都可以用上面的方法调用；
　　2)不是所有的Command ID都是由“Internet Explorer_Server”窗口处理；
　　3)有一些Command ID是由上一级窗口“Shell DocObject View”处理。
　　所以我们还需要写一个函数。

　　调用文章开头提到的“导入/导出”对话框可以这样来做：

　　5、Refresh

　　熟悉TEmbeddedWB的读者可能注意到了ID_IE_CONTEXTMENU_REFRESH(6042)这个ID，在TEmbeddedWB中给出了一个当网页刷新时触发的OnRefresh事件，其中的关键代码如下：

　　6、需要注意的问题

　　1)用InvokeIEServerCommand (ID_IE_CONTEXTMENU_ADDFAV)调用“添加到收藏夹”对话框时需要注意的是，IE接收到 ID_IE_CONTEXTMENU_ADDFAV命令时是对网页中当前被选中的链接来执行“添加到收藏夹”操作的，如果没有选中的链接，才是将当前网页 添加到收藏夹。

　　2)新建IE窗口。这是浏览器编程中的难题之一，即从当前窗口新建一个Internet Explorer窗口，完全复制当前页的内容（包括“前进”、“后退”的状态），这可以通过InvokeShellDocObjCommand (ID_IE_FILE_NEWWINDOW)来实现。

　　3)显示IE的版本信息。调用InvokeShellDocObjCommand(ID_IE_HELP_ABOUTIE)，如下：

　　4)InvokeShellDocObjCommand(ID_IE_FILE_PRINT)调出的“打印”对话框是非模态的（我们不太清楚 Microsoft的设计意图，我认为“打印”对话框应该是模态的），显示模态窗口的方法请参考我的另一篇文章《利用WH_CBT Hook将非模态对话框显示为模态对话框》

　　2、IShellUIHelper接口

　　微软专门提供了一个接口IShellUIHelper来实现对Windows Shell API一些功能的访问，将链接添加到收藏夹也是其中之一，就是下面的AddFavorite函数。

　　实例代码如下：

　　我们注意到这里的“AddFavorite”函数并没有像“DoOrganizeFavDlg”那样需要一个父窗口句柄。这也导致与在IE中打 开不同，通过IShellUIHelper接口显示出来的“添加到收藏夹”对话框是“非模态”的，有一个独立于我们应用程序的任务栏按钮，这使我们的浏览 器显得非常不专业（我是个追求完美的人，这也是我的浏览器迟迟不能发布的原因之一）。

　　于是我们很自然地想到“shdocvw.dll”中除了“DoOrganizeFavDlg”外，应该还有一个类似的函数，可以传入一个父窗口句柄用以显示模态窗口，也许就像这样：

　　事实上，这样的函数确实存在于“shdocvw.dll”中，那就是“DoAddToFavDlg”。

　　3、DoAddToFavDlg函数

　　“DoAddToFavDlg”函数也是“shdocvw.dll”暴露出来的函数之一，其原型如下：

　　第一个参数正是我们想要的父窗口句柄，第二和第四个参数分别是初始目录（一般来说就是收藏夹目录）和要添加的链接的名字（比如网页的 Title），第三和第五个参数分别是第二和第四两个缓冲区的长度，而最后一个参数则是指向与第二个参数目录相关的item identifier list的指针(PIDL)。但最奇怪的是这里并没有像“AddFavorite”函数一样的链接URL，那链接是怎样添加的呢？答案是“手动创建”。

第二个参数在函数调用返回后会包含用户在“添加到收藏夹”对话框中选择或创建的完整链接路径名（如“X:\XXX\mylink.url”），我们就根 据这个路径和网页的URL来创建链接，代码如下（为简化，此处省去检查"shdocvw.dll"是否已在内存中的代码，参见《Internet Explorer 编程简述（三）“整理收藏夹”对话框》）：

　　实现CreateInternetShortcut函数创建Internet快捷方式，可以用读写INI文件的方法，但更好的则是利用IUniformResourceLocator接口。

　　好，上面的方法虽然麻烦一点，但总算解决了“模态窗口”的问题，使得我们的程序不至于让用户鄙视。但是问题又来了，我们发现“允许脱机使用”是Disabled的，那“自定义”也就无从谈起了，尽管90%的人都没有使用过IE提供的脱机浏览。

　　难道我们的希望要破灭吗？我们一方面想像调用“AddFavorite”函数一样的不必手动创建链接，一方面又要模态显示窗口，就像IE那样，还能自定义脱机浏览。

　　3、脚本方式

　　许多网页上都会有一个按钮或链接“添加本页到收藏夹”，实际上通过下面的脚本显示模态的“添加到收藏夹”对话框将网页加入到收藏夹。

　　这里的external对象是WebBrowser内置的COM自动化对象，以实现对文档对象模型（DOM）的扩展（我们也可以通过 IDocHostUIHandler实现自己的扩展）.查阅MSDN可以得知external对象的的方法与IShellUIHelper接口提供的方法 是一样的。我们有理由相信，IShellUIHelper提供了对WebBrowser内置的external对象的访问，如果在适当的地方创建 IShellUIHelper接口的实例，也许调用“AddFavorite”函数显示出来的就是模态对话框了。问题是我们还没有找到这样的地方。

　　从上面的脚本，我们很自然地又想到另一个方法。如果能够让网页来执行上面的脚本，岂不是问题就解决了？说做就做，如下：

　　先从CHtmlView获得文档的父窗口window对象的指针，再调用其方法execScript来执行脚本（事实上可以执行任意的脚本）。 试验发现，这个方法非常有效，不仅窗口是模态的，而且不需要手动创建链接，更重要的是“允许脱机使用”和“自定义”按钮也可以用了。

　　4、问题仍旧没有解决

　　执行脚本的方式看起来有效，可一旦我们的程序实现了IDocHostUIHandler接口对WebBrowser进行高级控制，就会发现一旦 执行的脚本包含有对“external”对象的调用，就会出现“找不到对象”的脚本错误。原因是当MSHTML解析引擎（并非WebBrowser）检查 到宿主实现了IDocHostUIHandler接口，就会调用其GetExternal方法以获得一个用以扩展DOM的自动化接口的引用。

　　但有时候我们并没有想要扩展DOM，同时我们还希望WebBrowser使用它自己的DOM扩展。糟糕的是GetExternal方法的文档中 说这种情况下必须把ppDispatch设置为NULL，换句话说，WebBrowser连它内置的external对象也不用了，那我们的 window.external.AddFavorite就变得无处为家了。

　　我曾多方尝试将WebBrowser内置的external对象找出来，虽然都没有成功，但是解决问题的方法却被我找到了。

　　5、完美的方案

　　WebBrowser内置的external对象我们虽然找不到，但它肯定存在，我们只要想办法让WebBrowser自己完成对其调用即可。 实现非常简单，找到WebBrowser中包含的“Internet Explorer_Server”窗口的句柄，发一个消息就完成了。下面的代码中假设m_hWndIE就是“Internet Explorer_Server”窗口的句柄。

　　试一试成果，是不是和在Internet Explorer中选择“添加到收藏夹”的效果一模一样。

　　至于为什么这样做，后续文章再说。

　　 1、整理收藏夹

　　调用“整理收藏夹”对话框（如下），基本上来说都用的是同一个方法，即调用“shdocvw.dll”中的“DoOrganizeFavDlg”函数，把父窗口句柄和收藏夹路径作为参数传入即可。

　　 2、代码

　　代码实例如下所示，值得注意的是对“shdocvw.dll”的处理，为避免重复调用，应该先检查其是否已经在内存中。

　　 3、讨论

　　实际上，从“DoOrganizeFavDlg”函数的原型声明我们可以看到，由于需要一个路径，所以“整理收藏夹”对话框其实不仅可以用来整 理收藏夹，还可以整理磁盘上的目录。而且所谓的整理也不过是提供了一个对话框使用户用起来比较方便而已，和直接在资源管理器中整理没有实质性的差别。因此 调用“整理收藏夹”对话框的方法从IE4.0开始就没有变过，除了对话框的布局有所改变。

　　IE 4.0的“整理收藏夹”对话框

　　IE 4.0的“整理收藏夹”对话框（原本的设计）

　　“添加到收藏夹”就不同了，“DoAddToFavDlg”函数不再像“DoOrganizeFavDlg”函数一样对所有IE的版本都适用。

　　 参考资料：

　　MSDN: Adding Internet Explorer Favorites to Your Application

　　在Adobe Reader/Acrobat的属性设置窗口中，我们可以找到“Display PDF in browser”的选项，如果勾上，则Navigate("xxx.pdf")将会以嵌入的方式在IE中浏览PDF文件，否则在独立的Adobe Reader/Acrobat窗口中浏览。但在Office的“选项”对话框中我们找不到这样的设置。

　　问题：如何在自己的浏览器中控制Office这类Ole Servers的打开方式？

　　答案：修改文件夹选项，或修改注册表。

　　方法1、如下所示，从控制面板中打开“文件夹”选项，在“文件类型”属性页上找到相应的文件后缀名，如“DOC”，点击“高级”按钮，在弹出的“编辑文件类型”对话框中有“在同一窗口中浏览”的选项，如果勾上，则以嵌入IE的方式打开文档，否则在独立窗口中打开。

　　方法2、直接修改注册表。

　　在“HKEY_LOCAL_MACHINE\SOFTWARE\Classes”键值下，保存了各种文件类型的注册信息，以Office文档为例，与文档相关键值如下。

　　文档类型 键值

　　Microsoft Excel 7.0 worksheet Excel.Sheet.5

　　Microsoft Excel 97 worksheet Excel.Sheet.8

　　Microsoft Excel 2000 worksheet Excel.Sheet.8

　　Microsoft Word 7.0 document Word.Document.6

　　Microsoft Word 97 document Word.Document.8

　　Microsoft Word 2000 document Word.Document.8

　　Microsoft Project 98 project MSProject.Project.8

　　Microsoft PowerPoint 2000 document PowerPoint.Show.8

如果我们要修改Word文档的打开方式，，则在“HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ Word.Document.8”下新建一个名为“BrowserFlags”，类型为“REG_DWORD”的子键值，如果设置其值为“8”，则在独立 的窗口中打开Word文档，否则在嵌入IE的Word窗口中打开文档。

　　注：Microsoft Excel 7.0 worksheet稍有不同，应设置BrowserFlags的值为“9”方可在独立的窗口中打开文档。

　　其间正是多窗口浏览器全面开花的日子，无奈手头事情太多，我的作品Multiple iExplorer也一直未能问世，至今遗憾。后来常与GoSurf的作者交流学习，替他解决了不少问题，也从他那里学到许多。如今GoSurf有了比较 固定的用户群，有我一份功劳，算是一种安慰吧，他也一度在GoSurf官方主页上将我列为核心技术支持，但我后来因为工作和学习的关系很少再和他联系，实 在惭愧。

　　回头再看当时的文章，错误实在不少，认识也比较浅薄，有些问题更是一直没有得到解决，所以我觉得有必要在前文的基础上，花点时间将我积累的关于Internet Explorer编程的问题比较完整地写出来，希望对自己有个交代，对大家有一些帮助。

　　是为序。

　　 Internet Explorer编程简述（一）WebBrowser还是WebBrowser_V1

　　你的机器上总是存在着“两”个WebBrowser，一个叫WebBrowser，另一个叫WebBrowser_V1，其CLASSID如下：

　　它们分别对应的接口是IWebBrowser2和IWebBrowser。问题是我们该用哪一个呢？
　　按照微软的推荐，应该尽量使用 前者，因为后者是为兼容Internet Explorer 3.x而保留的（尽管它能够响应来自Internet Explorer 3.x、4.x、5.x、6.x的事件），相应的IWebBrowser和IWebBrowserApp接口也应抛弃。

　　由于Internet Explorer 3.x年代久远，导致WebBrowser_V1提供的事件少得可怜，但值得一提的是它提供的两个事件OnNewWindow和 OnFrameBeforeNavigate有着与OnBeforeNavigate几乎相同的参数：

　　所以使用WebBrowser_V1使得我们的浏览器在有新窗口打开时能够轻易捕捉到其URL及相关的数据，如果将Processed设置为TRUE，则可取消新窗口的弹出。同样，处理Frame也比在WebBrowser中来得容易。

　　但WebBrowser_V1的致命弱点是它不支持高级接口，如IDocHostUIHandler，即便我们实现了 IDocHostUIHandler接口，也不会被WebBrowser_V1调用。所以希望在自己的浏览器中实现XP的界面主题、扩展IE的DOM （Document Object Model）等高级控制的话，就肯定不能选择WebBrowser_V1了。

　　处理新窗口实在是很麻烦的一件事，不知道微软为什么在新版本的OnNewWindow2事件中去掉了URL这样的参数，而且OnNewWindow2事件不能完全捕捉到所有的新窗口打开。但如果安装了Windows XP SP2的话，好处又回来了。

　　Windows XP SP2对Internet Explorer 6作了升级，并且提供了一个新的事件OnNewWindow3，它在OnNewWindow2事件之前发生，也包含了让我们能够加以过滤处理的新窗口的 URL等参数，再加上INewWindowManager接口，就是实现Windows XP SP2中过滤广告窗口功能的基础。