显示HTML对话框
用VC做GUI是一件相当闹心的事,自绘、各种细节调整真的需要程序员很要有耐心,而且当碰到朝令夕改的情况时,那就会让人抓狂了.现在发现很多软件的显示都是基于网页控件了,这办法好啊,改界面的事完全可以推给美工了,大善!。MFC提供了类CDHtmlDialog用来显示HTML对话框.要在非MFC框架下(如WTL)下显示HTML对话框就要自己动手了.
mshtml.dll中有个ShowHTMLDialog可以显示HTML对话框，MSDN定义如下:
HRESULT ShowHTMLDialog( HWND hwndParent,
IMoniker *pMk,
VARIANT *pvarArgIn,
WCHAR *pchOptions,
VARIANT *pvarArgOut
);
在此,我结合网上的一些资源,简单地封装了它的用法,网页事件的获取还没实现,以后会慢慢补上:
IMoniker *pMk,
VARIANT *pvarArgIn,
WCHAR *pchOptions,
VARIANT *pvarArgOut
);
#include <urlmon.h>
#pragma comment(lib, "urlmon.lib")
/*
* 获取uIDHtml指定的HTML资源的源码
*/
inline CString LoadHtmlResource(_U_STRINGorID uIDHtml)
{
HRSRC hrsrc = ::FindResource(ATL::_AtlBaseModule.GetResourceInstance(), uIDHtml.m_lpstr, RT_HTML);
if( hrsrc != NULL )
{
DWORD dwSize = ::SizeofResource(ATL::_AtlBaseModule.GetResourceInstance(), hrsrc);
HGLOBAL hGlobal = ::LoadResource(ATL::_AtlBaseModule.GetResourceInstance(), hrsrc);
if( hGlobal != NULL )
{
LPSTR pszData = (LPSTR) ::LockResource( hGlobal );
if( pszData != NULL )
{
pszData[dwSize] = 0;
CString strHtml = pszData;
UnlockResource( hGlobal );
::FreeResource( hGlobal );
return strHtml;
}
}
}
return CString();
}
class CHtmlDialog
{
private:
HINSTANCE m_hInstMSHTML;
SHOWHTMLDIALOGFN* m_pfnShowHTMLDialog;
public:
CHtmlDialog()
{
m_hInstMSHTML = ::LoadLibrary( _T("MSHTML.DLL") );
ATLASSERT( m_hInstMSHTML != NULL );
m_pfnShowHTMLDialog = (SHOWHTMLDIALOGFN*)::GetProcAddress( m_hInstMSHTML, "ShowHTMLDialog" );
ATLASSERT( m_pfnShowHTMLDialog != NULL );
}
/*
* 根据HTML资源显示对话框
* hWnd: 指定父窗口
* bstrHtml: HTML源代码
*/
BOOL ShowHtmlDialog( HWND hWnd, BSTR bstrHtml, VARIANT *pvIn = NULL, BSTR bstrOptions = NULL, VARIANT *pvOut = NULL )
{
ATLASSERT( m_pfnShowHTMLDialog != NULL );
if( m_pfnShowHTMLDialog == NULL )return FALSE;
if( hWnd==NULL ) hWnd = ::GetForegroundWindow();
ATLASSERT( ::IsWindow( hWnd ) );
//CAtlTemporaryFileEx源于我对ATL类CAtlTemporaryFile,详情请见我的另一篇博文<无语的CAtlTemporaryFile类>
CAtlTemporaryFileEx fileTmp;
fileTmp.Create();
//将HTML源码写入临时文件
fileTmp.Write( COLE2CT( bstrHtml ), wcslen( bstrHtml ) * sizeof( wchar_t ) );
fileTmp.Close();
CComBSTR bstrText(L"file:///");
bstrText += fileTmp.TempFileName();
CComPtr<IMoniker> spMoniker;
HRESULT hr;
hr = ::CreateURLMoniker( NULL, bstrText, &spMoniker );
if( SUCCEEDED(hr) )
{
//显示HTML对话框
hr = (*m_pfnShowHTMLDialog)( hWnd, spMoniker.p, pvIn, CT2W( COLE2CT( bstrOptions ) ), pvOut );
ATLASSERT( SUCCEEDED(hr) );
spMoniker.Release();
}
return ( hr==S_OK );
}
/*
* 重载ShowHtmlDialog方法,用HTML资源ID作为输入参数
*/
BOOL ShowHtmlDialog( HWND hWnd, _U_STRINGorID uIDHtml, VARIANT *pvIn = NULL, BSTR bstrOptions = NULL, VARIANT *pvOut = NULL )
{
CString strHtml;
strHtml = LoadHtmlResource( uIDHtml );
return ShowHtmlDialog( hWnd, CT2OLE( strHtml ), pvIn, bstrOptions, pvOut );
}
~CHtmlDialog()
{
if( m_hInstMSHTML != NULL )
{
::FreeLibrary( m_hInstMSHTML );
}
}
};
使用示例:
#pragma comment(lib, "urlmon.lib")
/*
* 获取uIDHtml指定的HTML资源的源码
*/
inline CString LoadHtmlResource(_U_STRINGorID uIDHtml)
{
HRSRC hrsrc = ::FindResource(ATL::_AtlBaseModule.GetResourceInstance(), uIDHtml.m_lpstr, RT_HTML);
if( hrsrc != NULL )
{
DWORD dwSize = ::SizeofResource(ATL::_AtlBaseModule.GetResourceInstance(), hrsrc);
HGLOBAL hGlobal = ::LoadResource(ATL::_AtlBaseModule.GetResourceInstance(), hrsrc);
if( hGlobal != NULL )
{
LPSTR pszData = (LPSTR) ::LockResource( hGlobal );
if( pszData != NULL )
{
pszData[dwSize] = 0;
CString strHtml = pszData;
UnlockResource( hGlobal );
::FreeResource( hGlobal );
return strHtml;
}
}
}
return CString();
}
class CHtmlDialog
{
private:
HINSTANCE m_hInstMSHTML;
SHOWHTMLDIALOGFN* m_pfnShowHTMLDialog;
public:
CHtmlDialog()
{
m_hInstMSHTML = ::LoadLibrary( _T("MSHTML.DLL") );
ATLASSERT( m_hInstMSHTML != NULL );
m_pfnShowHTMLDialog = (SHOWHTMLDIALOGFN*)::GetProcAddress( m_hInstMSHTML, "ShowHTMLDialog" );
ATLASSERT( m_pfnShowHTMLDialog != NULL );
}
/*
* 根据HTML资源显示对话框
* hWnd: 指定父窗口
* bstrHtml: HTML源代码
*/
BOOL ShowHtmlDialog( HWND hWnd, BSTR bstrHtml, VARIANT *pvIn = NULL, BSTR bstrOptions = NULL, VARIANT *pvOut = NULL )
{
ATLASSERT( m_pfnShowHTMLDialog != NULL );
if( m_pfnShowHTMLDialog == NULL )return FALSE;
if( hWnd==NULL ) hWnd = ::GetForegroundWindow();
ATLASSERT( ::IsWindow( hWnd ) );
//CAtlTemporaryFileEx源于我对ATL类CAtlTemporaryFile,详情请见我的另一篇博文<无语的CAtlTemporaryFile类>
CAtlTemporaryFileEx fileTmp;
fileTmp.Create();
//将HTML源码写入临时文件
fileTmp.Write( COLE2CT( bstrHtml ), wcslen( bstrHtml ) * sizeof( wchar_t ) );
fileTmp.Close();
CComBSTR bstrText(L"file:///");
bstrText += fileTmp.TempFileName();
CComPtr<IMoniker> spMoniker;
HRESULT hr;
hr = ::CreateURLMoniker( NULL, bstrText, &spMoniker );
if( SUCCEEDED(hr) )
{
//显示HTML对话框
hr = (*m_pfnShowHTMLDialog)( hWnd, spMoniker.p, pvIn, CT2W( COLE2CT( bstrOptions ) ), pvOut );
ATLASSERT( SUCCEEDED(hr) );
spMoniker.Release();
}
return ( hr==S_OK );
}
/*
* 重载ShowHtmlDialog方法,用HTML资源ID作为输入参数
*/
BOOL ShowHtmlDialog( HWND hWnd, _U_STRINGorID uIDHtml, VARIANT *pvIn = NULL, BSTR bstrOptions = NULL, VARIANT *pvOut = NULL )
{
CString strHtml;
strHtml = LoadHtmlResource( uIDHtml );
return ShowHtmlDialog( hWnd, CT2OLE( strHtml ), pvIn, bstrOptions, pvOut );
}
~CHtmlDialog()
{
if( m_hInstMSHTML != NULL )
{
::FreeLibrary( m_hInstMSHTML );
}
}
};
TCHAR szHtml[] = _T("<html> \
<head> \
<title>MyHtmlDialog</title> \
</head> \
<body bgcolor=\"#66cc55\"> \
<BUTTON id=BUTTON1 style=\"Z-INDEX: 100; LEFT: 155px; POSITION: absolute; TOP: 73px\">Button</BUTTON> \
</body> \
</html>");
CHtmlDialog dlgHtml;
dlgHtml.ShowHtmlDialog( m_hWnd, CT2OLE( szHtml ) );
dlgHtml.ShowHtmlDialog( m_hWnd, IDR_HTML2 );
<head> \
<title>MyHtmlDialog</title> \
</head> \
<body bgcolor=\"#66cc55\"> \
<BUTTON id=BUTTON1 style=\"Z-INDEX: 100; LEFT: 155px; POSITION: absolute; TOP: 73px\">Button</BUTTON> \
</body> \
</html>");
CHtmlDialog dlgHtml;
dlgHtml.ShowHtmlDialog( m_hWnd, CT2OLE( szHtml ) );
dlgHtml.ShowHtmlDialog( m_hWnd, IDR_HTML2 );
