K
kingroad
Unregistered / Unconfirmed
GUEST, unregistred user!
我要用程序控制Webbrowser中的内容,上下左右移动。
有人说用下面的代码可求出页面宽度和页面高度:
var
Doc:IHTMLDocument2 ;
Body:IHTMLBodyElement ;
Doc:= IHTMLDocument2(IWebBrowser2.Document);
Body:= IHTMLBodyElement( Doc.Body);
Body.ScrollWidth为滚动条的可滚动宽度,加上IWebBrowser2的宽度就是页面宽度
Body.ScrollHeight为滚动条的可滚动高度,加上IWebBrowser2的高度就是页面高度
其实在 Delphi 6中,根本没有ScrollWidth,scrollHeight 属性。
请高手指教。
有人说用下面的代码可求出页面宽度和页面高度:
var
Doc:IHTMLDocument2 ;
Body:IHTMLBodyElement ;
Doc:= IHTMLDocument2(IWebBrowser2.Document);
Body:= IHTMLBodyElement( Doc.Body);
Body.ScrollWidth为滚动条的可滚动宽度,加上IWebBrowser2的宽度就是页面宽度
Body.ScrollHeight为滚动条的可滚动高度,加上IWebBrowser2的高度就是页面高度
其实在 Delphi 6中,根本没有ScrollWidth,scrollHeight 属性。
请高手指教。