|
编译/赵湘宁
在Visual Studio 6.0中出现了一个新类CHtmlView，利用这个类，我们可以实现在对话框的控制中显示HTML文件。 要想使用CHtmlView类，对它的定义和实现就必须有全面深入的理解。我们不妨拿CHtmlView和CListView做一个比较，通过比较这两个类，我们会发现一些有趣的差别。首先，MFC中CListView有一个对应的CListCtrl类，而CHtmlView却没有一个CHtmlCtrl类与之对应；其次，CListView的使用依赖于MFC的文档/视结构，而CHtmlView的实现是基于COM的。通过IWebBrowser2接口来实现，而且IWebBrowser2与MFC文档/视图结构之间没有任何关系。 为了实现在对话框的控制中显示HTML文件，我们也可以为CHtmlView创建一个对应的类CHtmlCtrl。以下是类CHtmlCtrl程序源代码： 创建一个静态控制（也可以是其他控制），这个控制的ID及大小位置与界面上的控制相同。 BOOL CHtmlCtrl::CreateFromStatic(UINT nID, CWnd* pParent)
{
CStatic wndStatic;
if (!wndStatic.SubclassDlgItem(nID, pParent))
return FALSE;
// 获取静态控制的矩形区域并转换为父窗口的客户区坐标
CRect rc;
wndStatic.GetWindowRect(&rc);
pParent->ScreenToClient(&rc);
wndStatic.DestroyWindow();
// 创建 HTML 控制 (CHtmlView)
return
Create(NULL, // 类名
NULL, // 标题
(WS_CHILD | WS_VISIBLE ), // 风格
rc, // 矩形区域
pParent, // /父窗口
nID, // 控制 ID
NULL); ///框架/文档
}
为了避免主控程序将CHtmlView对象看作是文档/视图框架，需要重载，CView::OnMouseActivate和CView::OnDestroy。此外，当用户在控制中单击时，OnMouseActivate要负责响应（WM_MOUSEACTIVATE）。
int CHtmlCtrl::OnMouseActivate(CWnd* pDesktopWnd, UINT nHitTest, UINT msg)
{
//旁路 CView 文档/框架
return CWnd::OnMouseActivate(pDesktopWnd, nHitTest, msg);
}
void CHtmlCtrl::OnDestroy()
{
if (m_pBrowserApp)
{
m_pBrowserApp->Release();
m_pBrowserApp = NULL;
}
CWnd::OnDestroy(); // 旁路 CView 文档/框架
}
通常，CHtmlView是在virtual void PostNcDestroy()中释放空间，但对话框中的控制常常是作为堆栈对象实现的，所以，在PostNcDestroy()中不必在做什么。
virtual void PostNcDestroy() { }
为了实现“app:” 伪协议，重载导航处理器OnBeforeNavigate2()。传递“app:”链接到一个虚拟协议处理器。因为app:是假协议，所以在浏览起重要取消掉这个导航。
void CHtmlCtrl::OnBeforeNavigate2( LPCTSTR lpszURL,
DWORD nFlags,
LPCTSTR lpszTargetFrameName,
CByteArray& baPostedData,
LPCTSTR lpszHeaders,
BOOL* pbCancel )
{
const char APP_PROTOCOL[] = "app:";
int len = _tcslen(APP_PROTOCOL);
if (_tcsnicmp(lpszURL, APP_PROTOCOL, len)==0)
{
OnAppCmd(lpszURL + len);
*pbCancel = TRUE;
}
}
重载OnAppCmd（），处理app:命令，当浏览器准备导航到“app:foo”时，这个函数被调用，参数lpszWhere的值为“foo”。
void CHtmlCtrl::OnAppCmd(LPCTSTR lpszWhere){ // default: do nothing}
重载OnMouseActivate, OnDestroy, 和 PostNcDestroy以后，CHtrmlCtrl在对话框中就可以象个控制一样工作。详细的使用方法请参见例子程序：AboutHtml。 运行AboutHtml.exe，并打开About对话框……音乐多么美妙！更有趣的是程序所用到的HTML源文件、图像、声音等文件都作为资源存储在EXE文件中：
// in AboutHtml.rc ABOUT.HTM HTML DISCARDABLE "res\\about.htm" PD.JPG HTML DISCARDABLE "res\\pd.jpg" OKUP.GIF HTML DISCARDABLE "res\\okup.gif" OKDN.GIF HTML DISCARDABLE "res\\okdn.gif" MOZART.WAV HTML DISCARDABLE "res\\mozart.wav"注意：用文件的实际名字作为资源名很重要，以便浏览器能够找到他们。在一个普通的Web页面中，我们使用图像是用下列语法： <IMG src="pd.jpg">此代码假设图像文件"pd.jpg"存在当前目录（页面文件所在目录）中。 如果图像文件是作为资源存在EXE文件中，我们如何引用呢？方法一样，此时，我们必须告诉浏览器Web页面文件的位置。为此要在Web页面文件的开头加上如下代码： <BASE url="res://AboutHtml.exe/about.htm">这一行代码告诉浏览器当前目录是“res://AboutHtml.exe”，当浏览器遇到代码<IMG src="pd.jpg">时，它会按照路径res://AboutHtml.exe/pd.jpg查找。否则，它会在程序文件的路径查找。 通常用res://modulename可以访问动态库或可执行文件中的资源。这里res:的意思与http:，ftp:，file:，及mailto的意思相同。即：“在这个路径中的第一个名字是一个文件名，第二个名字是文件中的资源名”。其余的工作由浏览器完成。 为了实现About对话框，先建一个对话框类：CAboutDialog，其中声明一个CHtmlCtrl对象：m_page。CAboutDialog本身的初始化代码如下： BOOL CAboutDialog::OnInitDialog()
{
VERIFY(CDialog::OnInitDialog());
VERIFY(m_page.CreateFromStatic(IDC_HTMLVIEW, this));
m_page.LoadFromResource(_T("about.htm"));
return TRUE;
}
CHtmlCtrl::CreateFromStatic是个很简单的函数，它用于简化对话框的设计。因为用插入COM对象的方法太麻烦，所以我在对话框中插入了一个静态控件，改变它的缺省ID号。然后调用CreateFromStatic，以完全相同的ID号、大小、位置创建一个静态CStatic对象。然后在调用DestroyWindow，这个方法很有效。为了加载web页面，调用CHtmlCtrl::LoadFromResource函数，它是由CHtmlView继承而来的。也可以用全路径res://AboutHtml.exe/about.htm作为参数。 <A href="ok"><IMG ...></A>当用户单击它时，浏览器显示这个“OK”文件，但是在显示之前，控制先执行CHtmlCtrl::OnBeforeNavigate2。CHtmlCtrl能够在这个函数中做想做的任何事情。 void CMyHtmlCtrl::OnBeforeNavigate2(
LPCTSTR lpszURL,
...,
BOOL* pbCancel)
{
if (_tcscmp(lpszURL,_T("ok"))==0)
{
// "ok" clicked:
*pbCancel=TRUE; // abort
// will close dialog
GetParent()->SendMessage(WM_COMMAND,IDOK);
}
}
其实“OK”并不是什么文件；它只是一个很特殊的名字，CHtmlCtrl将它看作是“OK”按钮。为了实现这个想法，程序中创建了一个叫app：的冒充协议来代替“OK”，在about.htm中实际的链接是app:ok。每当浏览器导航到app:somewhere的时候，CHtmlCtrl都以“somewhere”为参数调用一个虚函数：CHtmlCtrl::OnAppCmd。
void CMyHtmlCtrl::OnAppCmd( LPCTSTR lpszWhere )
{
if (_tcsicmp(lpszWhere, _T("ok"))==0)
{
GetParent()->SendMessage(WM_COMMAND,IDOK);
}
}
您可以在HTML文件中作其他的链接，诸如：app:cancel, app:refresh, 或 app:whatever等等，并且在OnAppCmd中编写自己的代码来处理 “cancel”、“refresh”、和“whatever” 、 字符串，它有点象在VB中编程。参照例子程序，将自己的About对话框改进一番吧。如果有兴趣的话，您甚至可以利用这个技术来实现复活节彩蛋。 附录一：CHtmlCtrl类的定义和实现
//定义文件
HtmlCtrl.h
//
class CHtmlCtrl : public CHtmlView {
public:
CHtmlCtrl() { }
~CHtmlCtrl() { }
BOOL CreateFromStatic(UINT nID, CWnd* pParent);
// Normally, CHtmlView destroys itself in PostNcDestroy,
// but we don't want to do that for a control since a control
// is usually implemented as a stack object in a dialog.
//
virtual void PostNcDestroy() { }
// overrides to bypass MFC doc/view frame dependencies
afx_msg void OnDestroy();
afx_msg int OnMouseActivate(CWnd* pDesktopWnd,UINT nHitTest,UINT message);
// override to trap "app:" pseudo protocol
virtual void OnBeforeNavigate2( LPCTSTR lpszURL,
DWORD nFlags,
LPCTSTR lpszTargetFrameName,
CByteArray& baPostedData,
LPCTSTR lpszHeaders,
BOOL* pbCancel );
// override to handle links to "app:mumble...". lpszWhere will be "mumble"
virtual void OnAppCmd(LPCTSTR lpszWhere);
DECLARE_MESSAGE_MAP();
DECLARE_DYNAMIC(CHtmlCtrl)
};
//实现文件
HtmlCtrl.cpp
//
#include "StdAfx.h"
#include "HtmlCtrl.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif
IMPLEMENT_DYNAMIC(CHtmlCtrl, CHtmlView)
BEGIN_MESSAGE_MAP(CHtmlCtrl, CHtmlView)
ON_WM_DESTROY()
ON_WM_MOUSEACTIVATE()
END_MESSAGE_MAP()
//////////////////
// Create control in same position as an existing static control with
// the same ID (could be any kind of control, really)
//
BOOL CHtmlCtrl::CreateFromStatic(UINT nID, CWnd* pParent)
{
CStatic wndStatic;
if (!wndStatic.SubclassDlgItem(nID, pParent))
return FALSE;
// Get static control rect, convert to parent's client coords.
CRect rc;
wndStatic.GetWindowRect(&rc);
pParent->ScreenToClient(&rc);
wndStatic.DestroyWindow();
// create HTML control (CHtmlView)
return Create(NULL, // class name
NULL, // title
(WS_CHILD | WS_VISIBLE ), // style
rc, // rectangle
pParent, // parent
nID, // control ID
NULL); // frame/doc context not used
}
////////////////
// Override to avoid CView stuff that assumes a frame.
//
void CHtmlCtrl::OnDestroy()
{
// This is probably unecessary since ~CHtmlView does it, but
// safer to mimic CHtmlView::OnDestroy.
if (m_pBrowserApp) {
m_pBrowserApp->Release();
m_pBrowserApp = NULL;
}
CWnd::OnDestroy(); // bypass CView doc/frame stuff
}
////////////////
// Override to avoid CView stuff that assumes a frame.
//
int CHtmlCtrl::OnMouseActivate(CWnd* pDesktopWnd, UINT nHitTest, UINT msg)
{
// bypass CView doc/frame stuff
return CWnd::OnMouseActivate(pDesktopWnd, nHitTest, msg);
}
//////////////////
// Override navigation handler to pass to "app:" links to virtual handler.
// Cancels the navigation in the browser, since app: is a pseudo-protocol.
//
void CHtmlCtrl::OnBeforeNavigate2( LPCTSTR lpszURL,
DWORD nFlags,
LPCTSTR lpszTargetFrameName,
CByteArray& baPostedData,
LPCTSTR lpszHeaders,
BOOL* pbCancel )
{
const char APP_PROTOCOL[] = "app:";
int len = _tcslen(APP_PROTOCOL);
if (_tcsnicmp(lpszURL, APP_PROTOCOL, len)==0) {
OnAppCmd(lpszURL + len);
*pbCancel = TRUE;
}
}
void CHtmlCtrl::OnAppCmd(LPCTSTR lpszWhere)
{
// default: do nothing
}
|
|
|
