Delphi代码：uses MSHTML;……var WebBrowser1: TWebBrowser; a: IHTMLDocument2;begin a :=WebBrowser1.Document as IHTMLDocument2; a.Get_ParentWindow.ScrollBy(dx,dy);或者 a.Get_ParentWindow.Scroll(x,y);
