重大突破，轻松在TWebBrower中写HTML源码,觉得好请UP

[wilddragon]

注意：IHTMLDocument2在 mshtml.dll中定义，使用时需要import这个库

uses MSHTML_TLB,SHDocVw;
procedure SetHtml(const WebBrowser: TWebBrowser; const Html: string);
var doc:IHTMLDocument2;
V:OleVariant;
begin
V:= VarArrayCreate([0, 0], varVariant);
V[0]:=Html;
doc:=WebBrowser.Document as IHTMLDocument2;
doc.body.innerHTML:='';
doc.write(PSafeArray(TVarData(v).VArray));
end;

此功能与MS DHTMLEDLib库中的DHTMLEdit控件配合，自己就可以做FrontPage啦，哈哈

[colderboy]

能给我个例子看看吗

[newwen]

up

[liaokuo]

我测试了，老打开空白页面

[nne998]

我想知道这个：此功能与MS DHTMLEDLib库中的DHTMLEdit控件配合

[quark]

关注

[classy]

up