CppWebBrowser的问题

beilas 2007-06-25 05:22:59

我现在有一个String 型的字符串。内容如下：
怎么用CppWebBrowser把它显示成网页啊。救我啊。。。。。。。。。谢谢了。

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.2800.1593" name=GENERATOR></HEAD>
<BODY bgColor=#eaeaea><FONT size=2><FONT face=宋体>您好！</FONT> </FONT>
<DIV> </DIV>
<DIV><FONT face=宋体 size=2>　　不好意思,早忘了</FONT></DIV>
<DIV> </DIV>
<DIV><FONT face=宋体 size=2>======== 2007-06-19 16:34:00 您在来信中写道：
========</FONT></DIV>
<DIV> </DIV>
<DIV><FONT size=2>
<TABLE width="100%">
<TBODY>
<TR>
<TD width="100%">
<BLOCKQUOTE
style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV>还有些问题如果你解决了的话能帮助我一下吗？</DIV>
<DIV> </DIV>
<DIV> </DIV>
<DIV> </DIV><BR><BR>
<HR>
<A
style="FONT-SIZE: 14px; COLOR: #000; LINE-HEIGHT: 15px; TEXT-DECORATION: none"
href="http://event.mail.163.com/chanel/xyq.htm?from=163_NO1"
target=_blank><SPAN style="COLOR: blue; TEXT-DECORATION: underline">150
万人同时在玩的网游，你不试试吗？
</SPAN></A></BLOCKQUOTE></TD></TR></TBODY></TABLE></FONT></DIV>
<DIV>
<P><FONT face=宋体 size=2>= = = = = = = = = = = = = = = = = = = = = = </FONT></P>
<P><FONT face=宋体 size=2>　　　　　　　　致<BR>礼！</FONT></P>
<DIV> </DIV>
<DIV><FONT face=宋体 size=2>　　　　　　　　　　　　　　</FONT></DIV>
<DIV><FONT face=宋体 size=2><FONT face=宋体 size=2>　　　　　　　　　　　　　　</FONT><A
href=""></A></FONT></DIV>
<DIV><FONT face=宋体 size=2>　　　　　　　　　　　　　　　2007-06-20</FONT></DIV>
<DIV> </DIV></DIV></BODY></HTML>

...全文

133 4 打赏收藏转发到动态举报

写回复

用AI写文章

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

csd08 2007-06-26

打赏
举报

其实cczlp(不惑）的 SetHtml方法是比较好的方法，他的方法缺点在于不能用于第一次显示网页上。
因为_di_IDispatch di = WebBrowser->Document ;这个语句如果在CppWebBrowser第一次载入内容的时候，WebBrowser->Document =NULL，因此必然出错。如果是CppWebBrowser已经显示有内容，则SetHtml方法就能正确执行。

可以象下面一样测试一下：
void __fastcall TForm1::Button1Click(TObject *Sender)
{
CppWebBrowser1->Navigate(L"");
Application->ProcessMessages();
AnsiString str = Memo1->Lines->Text;
SetHtml(CppWebBrowser1,str);
}

同时，在SetHtml函数中增加NULL值的判断：
_di_IDispatch di = WebBrowser->Document ;
if(di == NULL)
{
return;
}

这样的话，就不管是否有头标记都可以正确显示出来。

这个方法在执行到
CppWebBrowser1->Navigate(L"");
Application->ProcessMessages();
的时候，CppWebBrowser会有跳动，也有可能执行失败，不是很好。
实在抱歉，希望能给你带来点思路。
谢谢
^_^

beilas 2007-06-26

打赏
举报

csd08(jone)谢谢。你的我试了可以显示。但像：

<DIV >啊哈哈哈哈。</DIV><br><br><hr>
<a style="font-size:14px;line-height:15px; color:#000; text-decoration:none" href="http://event.mail.163.com/chanel/xyq.htm?from=126_NO6" target="_blank"><span style="text-decoration:underline; color:blue">人山人海盛景，尽在梦幻西游 </span> </a>

这种没有头标记的还是不行。不知道如何也能让它显示成HTML。

cczlp(不惑) 的我看不懂啊。刚学BCB。试了试有问题也不知道怎么解决。还是先给分吧。你们再帮我想想

cczlp 2007-06-25

打赏
举报

void __fastcall SetHtml( TCppWebBrowser *WebBrowser,AnsiString Html )
{
HRESULT hr;
IPersistStreamInit* pPersistStreamInit;
_di_IDispatch di = WebBrowser->Document ;

hr = di->QueryInterface( IID_IPersistStreamInit, (void**)&pPersistStreamInit );

IStream* pStream = NULL;
HGLOBAL hHtmlText = GlobalAlloc(GMEM_FIXED , Html.Length() + 1 );

if (hHtmlText)
{
strcpy((char*)hHtmlText, Html.c_str());
hr = CreateStreamOnHGlobal(hHtmlText, FALSE, &pStream );
if (SUCCEEDED(hr))
{
pPersistStreamInit->InitNew();
pPersistStreamInit->Load(pStream);
pStream->Release();
}
GlobalFree(hHtmlText);
}

pPersistStreamInit->Release();

}

csd08 2007-06-25

打赏
举报

简单一点就是将字符串载入到一个TStringList中，然后保存为一个文件，然后再用CppWebBrowser打开就可以了，例如：
AnsiString str = "c:\\a.a";
Memo1->Lines->SaveToFile(str);
CppWebBrowser1->Navigate(WideString(str));

假设Memo1中的内容就是你所说的String 型的字符串。

^_^

最近在做一个项目中遇到的问题，如何实现播放背景透明的flash，我的解决方法就是利用Form的AlphaBlend、AlphaBlendValue、TransparentColor、TransparentColorValue， ShockwaveFlash的BGColor属性。

我先介绍一下CppWebBrowser这个组件吧。实际上，BORLAND的这个组件是Microsoft Internet Control ActiveX控件的VCL组件形式的封装。如果你想获得更强大的功能，呵呵，说不得，你得去研究“IHTMLDocument2”接口指针了。这个东西在BCB和DELPHI 的帮助里都没有详细的说明，只能查MSDN了。当然，本文不涉及这个

添加了TCppWebBrowser之后，Form的按键消息就被迫屏蔽而不好捕捉，我们可以先添加一个TApplicationEvents在其Message事件里填写以下代码void __fastcall TForm1::ApplicationEvents1Message(tagMSG &Msg, bool &Handled){ IOleInPlaceActiveO

正在执行我解决不了我的问题之前，我希望有人知道如何...如何编辑HTML(标签)，通过CppWebBrowser我有一个组件上我的形式TCppWebBrowser，当我浏览到一个URL，在文档被下载之后，在方法OnDocumentComplete()中，我试图检查并更改加载文档的HTML源代码，然后由浏览器执行。我需要，因为一些网站有背景声音，我想解析html和删除标签或只是删除包含声音文件如* ...

在C++Builder中如何用“TCppWebBrowser”POST数据山注：我先介绍一下CppWebBrowser这个组件吧。实际上，BORLAND的这个组件是Microsoft Internet Control ActiveX控件的VCL组件形式的封装。如果你想获得更强大的功能，呵呵，说不得，你得去研究“IHTMLDocument2”接口指针了。这个东西在BCB和