当前位置:主页>Delphi教程>文章内容
FAQ:如何访问WebBrowser的滚动条
来源: 作者: 发布时间:2007-04-29  
 

问========================================

我使用webbrowser控件,但是想用自己的滚动条,但不知如何得到webbrowser中滚动条的长度,怎么办?谢谢!!

2004-10-24

答========================================

    抱歉拖了很久才回复你的问题。
    WebBrowser的滚动条不是一般的Windows滚动条,用GetScrollPos或GetScrollInfo等API是不能访问的。下面的代码演示了在VC中如何通过HTML接口来访问浏览器的滚动条。

    HRESULT hr;
    IDispatch *pDisp = GetHtmlDocument();
    ASSERT( pDisp ); //if NULL, we failed
   
    // 获得Html文档指针
    IHTMLDocument2 *pDocument = NULL;
    hr = pDisp->QueryInterface( IID_IHTMLDocument2, (void**)&pDocument );
    ASSERT( SUCCEEDED( hr ) );
    ASSERT( pDocument );

    IHTMLElement *pBody = NULL;
    hr = pDocument->get_body( &pBody );
    ASSERT( SUCCEEDED( hr ) );
    ASSERT( pBody );

    // 从body获得IHTMLElement2接口指针,用以访问滚动条
    IHTMLElement2 *pElement = NULL;
    hr = pBody->QueryInterface(IID_IHTMLElement2,(void**)&pElement);
    ASSERT(SUCCEEDED(hr));
    ASSERT( pElement );

    // 向下滚动100个像素
    pElement->put_scrollTop( 100 );
   
    // 获得滚动条高度
    long scroll_height;
    pElement->get_scrollHeight( &scroll_height );

    // 获得滚动条宽度
    long scroll_height;
    pElement->get_scrollWidth( &scroll_width );

    // 获得滚动条位置,从顶端开始
    long scroll_top;
    pElement->get_scrollTop( &scroll_top );


 
上一篇:TEmbeddedwb的一个小bug   下一篇:多层数据库开发三:创建多层应用程序
 
  相关文章
·TEmbeddedwb的一个小bug
·多层数据库开发三:创建多层应用程序
·一個可以顯示CheckBox或RadioButtons的
·一些让我受益匪浅的delphi资源站点
·用数据表创建树
·多层数据库开发二:单层和两层的应用程
·在TwebBrowser中调用隐藏的IE命令
·多层数据库开发四:BDE会话期
·(delphi)程序运行过程中等待对话框的自
·多层数据库开发五:连接数据库
·锁定数据记录
·多层数据库开发六:什么是数据集
 
【关闭窗口】
推荐本站资源
最新文章