用MFC实现WebGUI－－(CDHtmlDialog)

自从去年年底一次棘手的界面，开始研究用web做界面到现在大约1年，这一年间不是局限在实现层面，也并非一直研究这一个问题，有很多问题其实不是问题，只是自己没有想清楚或者思想没放开。对于一个界面开发人员，想必拉的对话框不少于100个，腻味不必说，光是对话框大小改变导致控件跟着变化都需要一番功夫，加上界面美观，界面的风格统一，界面的灵活多变......，头痛。在对话框里面加载位图，加载gif，超链接......，啊，没法控制了吧！在考虑远点，现在.net3.0技术已经完全打破应用和桌面的界限，我们的界面html资源完全可以放在一个web站点上，这样界面是完全动态的。

其间写过2篇这方面的文章，基于vc6实现，绕弯很大。在vc7.1、vc8里面要简单很多，主要是把几个以前为公开的类公开了，最重要的是在CWnd里面加入了一个虚函数CreateControlSite使得有机会改变控件站点以修改控件行为。在mfc类层次上，CHTMLView和 CDHtmlDialog为开发者提供了创建webgui的一系列基础设施，包括事件机制、窗口行为、以及对html文档操纵接口。我们在此基础上实现webgui很简单，然而仍然困惑我很久，经理也催过我几次我一直未肯决定最终方案。在我脑袋里一直琢磨是要应用程序完全操纵html文档，还是html访问应用获取信息，其实就是它们之间的通信模式。一直到昨天我才定下方案，应用通过IWebBrowser2接口操纵html元素，html通过vbscript、 javascript脚本响应本身事件，访问应用。主要是考虑通信自然畅通，而以前我一味想通过应用指令完全控制html元素，导致去解析html文档，费力不讨好。下面开始我的想法：

写一个dll，封装 CDHtmlDialog，提供一个类似html容器的对话框，功能就是加载html网页，以及创建与html呼应的com组件。它本身不包含与应用功能有关代码，应用有关的部分是html页面和对于的com功能组件。这里需要对 CDHtmlDialog进行了适当的改造以适合自己的目标：

首先从 CDHtmlDialog派生一个类CHTMLContainerDlg，默认情况下会生成一个网页资源，这个网页是这个对话框创建时加载的，我们需要的其实是一个容器而不是一个具体的对话框，所以删除网页资源，修改对话框头文件：

enum?{?IDD?=?IDD_HTMLCONTAINERDLG,?IDH?=?0?};

这里把IDH修改为0，因为我们删除了网页资源。然而在对话框创建后会加载该资源，在 CDHtmlDialog的OnInitDialog函数里面我们可以看到：

if?(m_nHtmlResID)
????????LoadFromResource(m_nHtmlResID);
????else?if?(m_szHtmlResID)
????????LoadFromResource(m_szHtmlResID);
????else?if?(m_strCurrentUrl)
????????Navigate(m_strCurrentUrl);

结果就是对话框一出现就会出现加载一个无效地址的页面，出现无法打开链接的页面，为了避免这个问题，需要重载OnInitDialog函数。其实就是拷贝mfc代码然后去掉上面那段代码就ok，强制不加载页面。那么为了加载指定页面，需要一个函数：

void?CHTMLContainerDlg::SetHtmlAndCom(CString?strURL,?CString?strProg)
{
????HRESULT????????hr????????=?NOERROR;
????m_strURL?=?strURL;
????hr?=?m_spComDisp.CoCreateInstance(strProg);
????if(FAILED(hr))
????{
????????TRACE(_T("Some?error?when?create?com?object/n"));
????}
????SetExternalDispatch(m_spComDisp);
}

指定html的url和对应功能组件的progid，这样在网页里面可以通过脚本window.external访问该com组件。
这样就可以加载html网页，但是html页面里面的元素风格却是2k风格(至少在ie7以下版本是如此)，这个怕是没起到一点美观作用，为之我考虑了半天，问过做web的人是否有办法，最终还是灵感光临，误撞上了。重载GetHostInfo函数：

STDMETHODIMP?CHTMLContainerDlg::GetHostInfo(DOCHOSTUIINFO*?pInfo)
{
????pInfo->dwFlags?=?DOCHOSTUIFLAG_THEME;
????return?S_OK;
}

这个多得不说，^_^。
下面就可以演示了，在vs2005里面找个向导来show一下：

CHTMLContainerDlg????dlg;
????TCHAR????????????????szPath[MAX_PATH]? = ? {?0?} ;
????CString????????????????strPath;
????GetCurrentDirectory(MAX_PATH,?szPath);
????strPath? = ?szPath;
????strPath? += ?_T( " //Default.htm " );
????dlg.SetHtmlAndCom(strPath,?_T( " TestWebCom.WebComCtrl " ));
????dlg.DoModal();

对话框标题其实可以通过解析html文档获取title标题设置，目前还未处理。下面看看html与应用交互的组件。
生成一个atl工程，TestWebCom，添加一个com组件WebComCtrl，添加方法处理上面那个带...的按钮(文件夹浏览按钮)：

STDMETHODIMP?CWebComCtrl::ShowFolderBrowser( void )
{
????AFX_MANAGE_STATE(AfxGetStaticModuleState());

????//?TODO:?在此添加实现代码
????AfxMessageBox(_T("In?Com,?you?can?show?folder?select?dialog"));
????return?S_OK;
}

这里不作具体处理，只是象征性弹出一个对话框。好了，上面我们在对话框里面已经设置了com组件的progid，这里可以把html和组件关联上了，通过脚本可以访问com组件方法：

< BUTTON? CLASS ="buttonClass3Custom" ?ID ="BrowseBtn" ?TYPE ="BUTTON" ?TITLE ="浏览头文件。" ?onClick ="OnBrowseHeaderFile();" > </ BUTTON >

脚本如下：

function ?OnBrowseHeaderFile()
{
????window.external.ShowFolderBrowser();
}

下面运行试一试，按下选择文件夹按钮会出现如下询问组件是否安全的对话框：

这个很恼人，用户可没有耐心忍受每次多弹出这个对话框询问组件是否安全。我开始打算将组件实现安全接口解决掉此问题，不过不知道缘何，没有成功，网上搜索一下好像说在ie7里面无效，没办法还是看mfc源码来解决问题。
CDHtmlDialog类获取external代码如下：

STDMETHODIMP?CDHtmlDialog::GetExternal(IDispatch? ** ppDispatch)
{
????if(ppDispatch?==?NULL)
????????return?E_POINTER;
????????
????*ppDispatch?=?NULL;
????if?(m_spExternalDisp.p?&&?CanAccessExternal())
????{
????????m_spExternalDisp.p->AddRef();
????????*ppDispatch?=?m_spExternalDisp.p;
????????return?S_OK;
????}
????return?E_NOTIMPL;
}

看到CanAccessExternal函数，肯定就是验证安全性的代码，找到函数声明，幸好是虚函数，重载直接返回TRUE：

BOOL?CHTMLContainerDlg::CanAccessExternal()
{
????//?we?trust?all?com?object?(haha,?you?can?make?virus)
????return?TRUE;
}

有兴趣的朋友可以看下内部实现。
这下就好了，按下网页选择文件夹按钮，弹出对话框：

一套流程完备，方案个人觉得不错，各司其职，通信自然畅通，一个html配对一个com功能组件，功能组件化不仅使代码封装性好，而且可以用于多种语言。

由于此技术不用于公司开发，今整理提供 下载