delphi的webbrower怎么样可以自定义显示的html内容？

我用delphi的webbrower访问一个网页，在那个网页中有个广告内容，我想在读取了网页的源代码后，在显示在webbrower控件中之前，过滤掉那部分广告内容的代码，然后在进行显示，不知有没有高手解答。

推荐答案 2013-07-10

function HTMLProcess(strCode: string): string;
begin
Result := '<html><span style="color:#aaccaa">asd</span></html>';
end;

procedure TForm1.WebBrowser1DocumentComplete(ASender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
Var
doc: IHTMLDOcument2;
strCode: String;
strProcessed: String;
begin
doc:=WebBrowser1.Document as IHTMLDOcument2;
strCode := Doc.body.innerHTML;
strProcessed := HTMLProcess(strCode);
Doc.body.innerHTML := strProcessed;
end;

å¨HTMLProcesså½æ°éæä½ éè¦æ¿æ¢æçå¹¿åHTMLä»£ç ç¨æ£åæèç´æ¥Replaceæè¿åå°±å¯ä»¥äºã

温馨提示：答案为网友推荐，仅供参考

当前网址：http://22.wendadaohang.com/zd/2X6T6ST6h.html

相似回答

如何使delphi在程序中显示本地的一个HTML文件?答：使用WebBrowser.Navigate(\'文件路径\');显示源代码用Memo控件使用memo.lines.loadfromfile(\'文件路径\');

如何在DELPHI中正确显示HTML页面答：可以将WEB控件的大大小设为FORM一样大大，如许可作为背景显示。应用WEB控件，并调用它的办法装载HTML文件。

大家正在搜

delphi执行html delphi打印html delphi html网页报表 html自定义列表自定义html标签 html5自定义标签 html自定义标签解析 html自定义列表标签 html自定义元素