Delphi WebBrowser 去除滚动条和边框

本文整理自网络，侵删。

 


去掉滚动条只对某些网页起作用，比如百度的页面就不知道为什么去不掉。
下面是用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';  
 

相关阅读 >>

Delphi 日期时间函数

Delphi adoquery查询，如何得到查询记录数？

Delphi 鼠标拖动控件自由移动位置

Delphi 的字符串在 firemonkey 模式下

Delphi indy 组件包里的 idhttp 组件使用 get 方法下载文件限速的方法

Delphi中操作powerpoint幻灯片的示例代码

Delphi shgetfileinfo函数

Delphi里动态创建access的交叉表视图

Delphi webbrowser 加载html 将html代码转换成网页

Delphi中调用http xml

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi WebBrowser 去除滚动条和边框