aaie_ / webbrowser / 用webbrowser显示字符串

0 0

   

用webbrowser显示字符串

2011-09-19  aaie_
uses   ActiveX,MSHTML   //加上两个单元!
procedure   ShowInWebBrowser(WebB:TWebBrowser;Str:String);
var
v:   Variant;
HTMLDocument:   IHTMLDocument2;
begin
HTMLDocument   :=   WebB.Document   as   IHTMLDocument2;
if   (assigned(HtmlDocument))   then   begin
v   :=   VarArrayCreate([0,   0],   varVariant);
v[0]   :=   str;   //that   is   to   be   shown
HTMLDocument.Write(PSafeArray(TVarData(v).VArray));
HTMLDocument.Close;
end;
end;
//调用
str= '输出内容 ';
ShowInWebBrowser(WebBrowser1, '输出内容 ');//可以为任意内容,包括HTML代码!
还有种方法,不如上面的灵活,但很简单实用!
str= '输出内容 ';
webbrowser1.Navigate( 'about: '+str);

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。如发现有害或侵权内容,请点击这里 或 拨打24小时举报电话:4000070609 与我们联系。

    猜你喜欢

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多
    喜欢该文的人也喜欢 更多