IE 控件一些高级使用方法
下载源代码
本文介绍如下内容
1、如何显示内存中的 HTML 网页；
2、如何屏蔽掉鼠标右键的上下文菜单；
3、如何扩展 HTML 中的脚本(external)对象；
4、如何显示 HTML 样式的对话窗；
5、如何执行 HTML 脚本；
一、如何显示内存中的 HTML 网页
或者因为网页保密的考虑；或者因为软件分发的考虑，有的时候就需要让 IE 或 IE 浏览器控件显示内存或资源中的 HTML 网页。在 MFC 中，CHtmlView::LoadFromResource() 可以显示程序资源中的 HTML 内容。我们都知道MFC的 CHtmlView 其实是对 IWebBrowser2 的一个包装，但是在 IWebBrowser2 中却没有类似的方法。那么它是如何实现的那？步骤如下：
1、首先通过 IWebBrowser2::Navigate2() 显示一个网页，其目的是产生有效的对象，从而得到 IHTMLDocument2 接口；
2、IWebBrowser2::get_Document() 得到 IHTMLDocument2 接口指针；
3、IHTMLDocument2::QueryInterface() 得到 IPersistStreamInit 接口指针；
4、IPersistStreamInit::InitNew() 初始化接口对象；
5、IPersistStreamInit::Load() 装载内存中的 HTML 数据流(IStream *)；
内存指针转换为流的方法是：
I、 GlobalAlloc() 申请内存；
II、 复制 HTML 字符串内容到上述的内存中；
III、 CreateStreamFromHGlobal() 转换内存为 IStream 指针；
原理性代码如下：
// 显示一个空白网页
m_ie.Navigate2( &CComVariant(_T("about:blank")),NULL,NULL,NULL,NULL);
// 得到 IHTMLDocument2 指针
CComPtr< IDispatch > spDoc(m_ie.GetDocument());
// 得到 IPersistStreamInit 指针
CComQIPtr< IPersistStreamInit, &IID_IPersistStreamInit > spPSI( spDoc );
// 申请内存,复制 HTML 字符串
LPTSTR lpMem = (LPTSTR)::GlobalAlloc( GPTR, ::lstrlen( lpHtml )+1 );
lstrcpy( lpMem, "
xxx xxx" );
// 转换内存为流对象指针
CComPtr< IStream > spStream;
CreateStreamOnHGlobal( lpMem, TRUE, &spStream );
// 初始化后，装载显示
spPSI->InitNew();
spPSI->Load( spStream );
图一、IE控件显示内存中的 HTML 文件 图二、HTML对话窗
IE 所能支持的数据传输协议，除了大家所熟悉的 http、ftp、file......还有一个协议是 res ，它表示浏览显示文件中的 HTML 资源。你可以在 IE 的地址栏上直接输入这样格式的 URL："res://文件名/资源名"。
把 HTML 文件加入到程序资源的方法比较简单，在资源卡片中，鼠标右键弹出菜单，执行 Import...(引入)，选择指定的 HTML 文件，然后给一个资源名称即可。（在这里，最方便的资源名称用字符串比较好，如果使用整数ID，那么将来在使用的时候是这样的格式：res://文件名/#101，这里假设 101 是资源的ID号。真麻烦！我不太喜欢这样的方式。）对于图片文件等其它的附件，则需要手工编辑资源 RC 文件（用 IDE 环境引入，它会试图用文本方式打开一个2进制文件，多数情况下会“死机”）。下图是事例程序引入资源后的样式：
图三、HTML 资源的引入
手工编辑 RC 文件的部分是：
......
/////////////////////////////////////////////////////////////////////////////
//
// HTML
//
HTML_TOWORD HTML DISCARDABLE "res\\ToWord.htm" // 这两个是HTML文件，可以引入
HTML_DLG HTML DISCARDABLE "res\\html_dlg.htm"
~SEND_R1_C1.GIF HTML DISCARDABLE "res\\~Send_r1_c1.gif" // 下面的是GIF文件，需要手工加入
~SEND_R1_C2.GIF HTML DISCARDABLE "res\\~Send_r1_c2.gif"
LOGO.GIF HTML DISCARDABLE "res\\Logo.gif"
SEND_R1_C1.GIF HTML DISCARDABLE "res\\Send_r1_c1.gif"
SEND_R1_C2.GIF HTML DISCARDABLE "res\\Send_r1_c2.gif"
SPACER.GIF HTML DISCARDABLE "res\\spacer.gif"
#endif // Chinese (P.R.C.) resources
/////////////////////////////////////////////////////////////////////////////
......
二、屏蔽 IE 控件的上下文菜单
屏蔽或自定义 IE 控件的上下文菜单，其实就是需要实现 IDocHostUIHandler 接口中的 ShowContextMenu 方法。如果使用 ATL 编写程序，我认为实现是比较简单的（也许是我使用 ATL 写 COM 比 MFC 熟悉一些的因素吧）。事例程序由于用 MFC 书写，真是搞的我头晕眼花，翻箱倒柜终于找到了微软书写的演示代码，于是我就直接复制过来使用了。（换句话说，读者在阅读这部分代码的时候，如果有问题可不要问我。你直接打电话去咨询 Microsoft 哈。）
三、扩展 HTML 脚本中的 external 对象
从 CCmdTarget 派生一个自动化对象（新建C++类的时候，注意别忘了选择 Automation）。在这个类里，你可以使用 ClassWizard 的 Automation 卡片，添加自定义的方法和属性。而在 HTML 的脚本程序中，就可以使用 window.external 进行调用了。用这个方法，实现了对 HTML 脚本功能的扩充。在 HTML 脚本和自动化对象之间要建立起关系，则需要实现 IDocHostUIHandler::GetExternal() 方法。
四、显示 HTML 样式的对话窗
这节内容是本文的重点。
用户的界面设计经历了若干个发展阶段。最早的程序设计，可以说没有用户界面；然后发展出一些简单的与用户交互的界面（控制台界面，全屏文本界面）；再然后发展出了图形界面。其实我们现在的商业程序设计中，界面的处理代码占用了很大的篇幅。为了使界面的处理变得简单、通用、易修改维护，人们制作了很多的界面程序库。说实在话，大多数的界面程序库由于封装的不好，一是不灵活，二是经常需要修改它内部的 BUG，重用的效果并不理想。通用的换肤软件也只能实现对标准的窗口类进行皮肤美化，对自定义的窗口类还是需要自己写钩子。咳......
现在，我们已经有一个非常好的方法进行界面设计了，那就是使用 HTML（使用 Visual Studio.net 的程序员，一定对 .net 的界面很喜欢吧？！.net 开发环境，无处不在使用 HTML 方式的界面）。即使是一个完全地道的本地软件（非B/S软件），也可以使用本地 ASP 方式，HTA 方式进行程序设计。软件用户非常喜欢这样的程序，因为他早就熟悉并掌握了浏览器的操作，另外，对于程序员来说，也非常喜欢这种方式，因为不会再为换肤，不同用户不同的界面特化而伤脑筋了。
微软将要在下一代的程序设计中使用 XML 来描述用户界面。这种设计方式将会解放你、我这样的程序员，把咱们的工作量全部都转化到美工师那里去了:) 借 vckbase 的平台，现在呼吁大家，尽快学习和掌握 HTML、XML 的设计和脚本编程，并能熟练地对它们与 C++ 对象的交互进行编程。可以预计在未来的两三年内，拥有这样水平的程序员，一定会开始吃香饽饽了，嘿嘿......
下面，就如何显示一个 HTML 对话窗，开始我们未来软件方式的编程吧。
我们要调用 MSHTML.DLL 中的一个函数 ShowHTMLDialog(Ex) 来完成 HTML 对话窗的显示和数据交互。这个函数的声明是：
HRESULT ShowHTMLDialogEx(
HWND hwndParent,
IMoniker *pMk,
DWORD dwDialogFlags,
VARIANT *pvarArgIn,
WCHAR *pchOptions,
VARIANT *pvarArgOut
);
| hwndParent | 对话窗的父窗口句柄 | 这个太简单了，不多罗嗦。 |
| pMk | URL的命名接口指针 | 表示在对话窗中显示哪个URL的页面。但它不是以简单的URL字符串方式提供的。它使用了moniker（命名）接口指针。 根据URL得到IMoniker *很简单，调用CreateURLMoniker()。唯一要注意的是，这个函数需要连接 Urlmon.lib 库。 |
| dwDialogFlags | 对话窗类型 | 可以组合 HTMLDLG_NOUI、HTMLDLG_MODAL、HTMLDLG_MODELESS、HTMLDLG_PRINT_TEMPLATE、HTMLDLG_VERIFY。 示例程序使用的是模式对话窗。HTMLDLG_NOUI 在下一节中介绍。 |
| pvarArgIn | 对话窗的输入参数 | 一个传入对话窗的VARIANT变量，对话窗脚本中使用 window.dialogArguments 可以取得。 |
| pchOptions | 对话窗样式 | 用字符串表示的对话窗样式。参考 IHTMLWindow2::showModalDialog()函数。 比如："dialogHeight:100px dialogWidth:200px"表示200点宽，100点高。如果你不想在程序中指定，也可以在HTML中<html style=....>描述。 |
| pvarArgOut | 对话窗输出参数 | 对话窗的VARIANT返回值，对话窗脚本中使用 window.returnValue 可以赋值。 |
五、执行 HTML 脚本
关于调用脚本的方法，我在 vckbase 发表了好几篇文章（鬼知道我为什么对脚本这么有兴趣）。ShowHTMLDialogEx（）函数中，如果类型参数给出 HTMLDLG_NOUI，则表示并不真正显示一个对话窗，而是加载指定的 HTML 并执行其中的脚本。示例程序的该脚本中，执行一连串的动作，完成了把上一个 HTML 对话窗中用户输入的文本，发送到 MS WORD 中去。以此上下串联起来，演示了本文章中所讨论的所有功能。下面我把脚本和注释给朋友们展现一下：
On Error Resume Next
Set wordapp=CreateObject("Word.Application") ''''运行 MS WORD
if err<>0 then
MsgBox("没有安装 MS WORD")
else
wordapp.visible = true ''''显示WORD界面
wordapp.Documents.Add "",false, 0 ''''新增一个空文档
wordapp.Selection.TypeText window.dialogArguments ''''键入传递进来的文本
end if
window.close '''' 关闭
六、结束语
好好学习、天天向上。做合格的社会主义计算机软件事业接班人。嘿嘿......
