您现在的位置:首页 >> VCL >> VCL >> 内容

Delphi操作WebBrowser的技巧锦集

时间:2011/9/3 16:26:55 点击:

  核心提示://判断网页及内部框架网页是否全部下载完毕procedure TForm1.WebBrowser1DocumentComplete(ASender: TObject; const pDisp: IDi...

//判断网页及内部框架网页是否全部下载完毕

procedure TForm1.WebBrowser1DocumentComplete(ASender: TObject;
  const pDisp: IDispatch; var URL: OleVariant);
begin
  if WebBrowser1.Application = pDisp then
  begin
    Text := '网页下载完毕!';
  end;
end;

//改变背景色或背景图片:
WebBrowser1.OleObject.document.body.bgcolor := '#FF0000';
WebBrowser1.OleObject.document.body.background := '...图片地址';

//或者:
  s := WebBrowser1.OleObject.document.parentWindow.span1.innerText;
  ShowMessage(s); //这是 span1 标签中的内容

//隐藏它:
  WebBrowser1.OleObject.document.parentWindow.span1.style.display := 'none';
end;

假如网页中有这样的内容: 这是 span1 标签中的内容   

Tags:操作 技巧 
作者:网络 来源:转载
共有评论 0相关评论
发表我的评论
  • 大名:
  • 内容:
本类推荐
  • 没有
本类固顶
  • 没有
  • 盒子文章(www.2ccc.com) © 2022 版权所有 All Rights Reserved.
  • 沪ICP备05001939号