如何改变CppWebBrowser的Html内容
摘要：void__fastcallTForm1::SetHtml(TCppWebBrowser*WebBrowser,AnsiStringHtml...
void __fastcall TForm1::SetHtml( TCppWebBrowser *WebBrowser,AnsiString Html )
{
IStream *Stream;
HGLOBAL hHTMLText;
IPersistStreamInit *psi;
if( WebBrowser->Document == NULL )
return;
hHTMLText = GlobalAlloc( GPTR, Html.Length() + 1 );
if( 0 == hHTMLText )
{
ShowMessage( "GlobalAlloc Error" );
return;
}
CopyMemory( hHTMLText, Html.c_str(), Html.Length() );
OleCheck( CreateStreamOnHGlobal( hHTMLText, true, &Stream ) );
try
{
OleCheck( WebBrowser->Document->QueryInterface( __uuidof(IPersistStreamInit), (void **)&psi ) );
try
{
OleCheck( psi->InitNew() );
OleCheck( psi->Load(Stream) );
}
catch( ... )
{
delete psi;
}
}
catch( ... )
{
delete Stream;
}
delete psi;
delete Stream;
}
IStream *Stream;
HGLOBAL hHTMLText;
IPersistStreamInit *psi;
if( WebBrowser->Document == NULL )
return;
hHTMLText = GlobalAlloc( GPTR, Html.Length() + 1 );
if( 0 == hHTMLText )
{
ShowMessage( "GlobalAlloc Error" );
return;
}
CopyMemory( hHTMLText, Html.c_str(), Html.Length() );
OleCheck( CreateStreamOnHGlobal( hHTMLText, true, &Stream ) );
try
{
OleCheck( WebBrowser->Document->QueryInterface( __uuidof(IPersistStreamInit), (void **)&psi ) );
try
{
OleCheck( psi->InitNew() );
OleCheck( psi->Load(Stream) );
}
catch( ... )
{
delete psi;
}
}
catch( ... )
{
delete Stream;
}
delete psi;
delete Stream;
}
【如何改变CppWebBrowser的Html内容】相关文章：
★ Apache伪静态html(URL Rewrite)设置法
★ python读取json文件并将数据插入到mongodb的方法
相关阅读
网友关注
网友最新关注视频
精品推荐
分类导航