RSS订阅 | 匿名投稿
您的位置:网站首页 > 组件 > 正文

Delphi WebBrowser 去除滚动条和边框

作者:admin 来源: 日期:2018/3/14 21:35:40 人气: 标签:



去掉滚动条只对某些网页起作用,比如百度的页面就不知道为什么去不掉。
下面是用Webbrowser显示图片时去掉边框和滚动条的方法,也适用于部分网页,实际上就是设置网页CSS。
在DocumentComplete事件中加入下列代码即可。

uses MSHTML;
((WebBrowser1.Document as IHTMLDocument2).body as HTMLBody).scroll := 'no';  
(WebBrowser1.Document as IHTMLDocument2).body.style.border := '0';  
(WebBrowser1.Document as IHTMLDocument2).body.style.borderStyle := 'none';  
(WebBrowser1.Document as IHTMLDocument2).body.style.margin := '0';  
(WebBrowser1.Document as IHTMLDocument2).body.style.padding := '0';  
(WebBrowser1.Document as IHTMLDocument2).body.style.overflow := 'hidden';  

读完这篇文章后,您心情如何?
0
0
0
0
0
0
0
0
本文网址:
下一篇:没有资料