我已成功实现了Webbrowser 的滚屏，可是...

var
  htmldoc: IHTMLDocument2;
begin
  htmldoc := WebBrowser_Main.Document as IHTMLDocument2;
  htmldoc.Get_parentWindow.scrollby(0,1); 
end;我用以上代码实现了webbrowser滚屏，可是不能让它在最后一行自动停止。
看了CSDN的滚屏代码javascript：
它有一个document.body.scrollTop的函数，通过scrollTop可以知道webbrowser装载的HTML的高度来实现自动停止。
可是在webbrowser里没有scrolltop这个函数。有哪位大虾有更好的方法实现Webbrowser的滚屏并让它在最后一行自动停止？或知道怎样得能webbrowser装载的HTML的高度或宽度？顺便问一下，有什么方法可能不通过webbrowser快速的把HTML文件转为TXT文件？
谢了！