|
一、若要滚动WebBrowser的内容W64Linux联盟
uses MSHTML;W64Linux联盟
……W64Linux联盟
varW64Linux联盟
WebBrowser1: TWebBrowser;W64Linux联盟
a: IHTMLDocument2;W64Linux联盟
beginW64Linux联盟
a :=WebBrowser1.Document as IHTMLDocument2;W64Linux联盟
a.Get_ParentWindow.ScrollBy(dx,dy);W64Linux联盟
或者W64Linux联盟
a.Get_ParentWindow.Scroll(x,y); W64Linux联盟
二、让WebBrowser得到焦点。W64Linux联盟
procedure SetFocusToDoc;W64Linux联盟
beginW64Linux联盟
if Wbe1.Document <> nil thenW64Linux联盟
with Wbe1.Application as IOleobject doW64Linux联盟
DoVerb(OLEIVERB_UIACTIVATE, nil, Self, 0, Handle, GetClientRect);W64Linux联盟
end;W64Linux联盟
Linux联盟收集整理 ,转贴请标明原始链接,如有任何疑问欢迎来本站Linux论坛讨论 |
|
