本文整理自网络,侵删。
uses mshtml;
var htmldoc: IHTMLDocument2;
MaxScrollWidth, MaxScrollHeight: Integer;
htmldoc := web.Document as IHTMLDocument2;
MaxScrollHeight := htmldoc.body.getAttribute('ScrollHeight', 0); //获得滚动条最大高度
MaxScrollWidth := htmldoc.body.getAttribute('ScrollWidth', 0);//获得滚动条最大宽度
Web.OleObject.Document.ParentWindow.ScrollBy(MaxScrollWidth, MaxScrollHeight ); //滚动到最右最下
//www.delphitop.com 搜集整理
相关阅读 >>
Delphi获取flash文件的影片时长,原始尺寸,帧数等信息
Delphi中使用内联变量(inline variables) 的5个理由
更多相关阅读请进入《Delphi》频道 >>