Webbrowser 如何利用程序将垂直 ScrollBar 拉到最下面?(35分)

  • 主题发起人 主题发起人 fongling5355
  • 开始时间 开始时间
F

fongling5355

Unregistered / Unconfirmed
GUEST, unregistred user!
Webbrowser 如何利用程序将垂直 ScrollBar 拉到最下面? (对不起, 没分了)
 
PostMessage(WebBrowser1.Handle, WM_KEYDOWN, vk_end, 0);
 
不行, 请问什么地方出了问题?
 
用TEmbeddedWB,他有ScrollToPosition函数
 
我试了我那种方法可以啊。<br>你再试试SENDMESSAGE。
 
void __fastcall TReadMainForm::SetLastScrollTop(int iScrollTop)<br>{<br> &nbsp; &nbsp;//TODO:设置当前浏览的位置。<br> &nbsp; &nbsp;IHTMLDocument2 *HTMLDocument = NULL;<br> &nbsp; &nbsp;IHTMLWindow2 &nbsp; *pHtmlWin = NULL;<br> &nbsp; &nbsp;//IHTMLPaintSite *pHTMLPaintSite = NULL;<br><br> &nbsp; &nbsp;VARIANT vScrollTop; &nbsp; &nbsp; &nbsp;<br><br> &nbsp; &nbsp;_di_IDispatch WebDocument = CppWebBrowser1-&gt;Document;<br> &nbsp; &nbsp;IDispatch * WebDocument1 = static_cast&lt;IDispatch *&gt;(WebDocument);<br> &nbsp; &nbsp;HTMLDocument = static_cast&lt;IHTMLDocument2 *&gt;(WebDocument1);<br> &nbsp; &nbsp;HTMLDocument-&gt;get_parentWindow(&pHtmlWin);<br> &nbsp; &nbsp;//WebDocument-&gt;QueryInterface(IID_IHTMLPaintSite ,(void**)&pHTMLPaintSite);<br><br> &nbsp; &nbsp;if(pHtmlWin)<br> &nbsp; &nbsp;{<br> &nbsp; &nbsp; &nbsp; &nbsp;pHtmlWin-&gt;scrollBy(0,iScrollTop);<br> &nbsp; &nbsp;}<br>}<br>//---------------------------------------------------------------------------
 
只需要一条语句:<br>webbrowser1.OleObject.document.body.scrollTop:=True;
 
后退
顶部