Delphi WebBrowser1实现滚屏

本文整理自网络，侵删。

 
WebBrowser1实现滚屏


uses MSHTML;
var
    a: IHTMLDocument2;
    x,y:Integer;
begin
    y:=y+20;   //加减进行上下滚动
    a :=WebBrowser1.Document as IHTMLDocument2;
    a.Get_ParentWindow.Scroll(x,y);
end;
复制代码
 

相关阅读 >>

Delphi 详解 enumwindows 与 enumwindowsproc

Delphi winapi: loadstring - 从资源中载入字符串

Delphi 15位身份证号码转18位身份证号码

Delphi中使用 twebbrowser 编辑网页

Delphi 调用外部 dll 中的函数(2. 晚绑定)

Delphi webservices传数据

Delphi 如何在定义局部变量时赋初始值

Delphi 获取其他进程句柄的几种方法

Delphi 获取本地网络连接

Delphi 通过进程id获取进程名

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi WebBrowser1实现滚屏