delphi里的WebBrowser如何执行脚本

减小字体 增大字体 作者:佚名  来源:不详  发布时间:2011-01-25 11:17:43

1、控制WebBrowser实际上就是控制IE,最简单的方法就是执行javascript或vbscript,省去了接口的转换。
如何执行脚本?以前我一直用mshtml中IHTMLWindow2接口的execScript()方法,在Delphi中需要uses MSHTML单元:

usesMSHTML;

procedureTForm1.Button1Click(Sender: TObject);
begin
   (WebBrowser1.Document   as  IHTMLDocument2).parentWindow.execScript('alert("hello");','javascript')
end;


2、用WebBrowser的Navigate()方法更简单:

procedureTForm1.Button1Click(Sender: TObject);
begin
   WebBrowser1.Navigate('javascript:alert("hello");')
end;

省去了添加引用的麻烦。

Tags:

作者:佚名
  • 好的评价 如果您觉得此文章好,就请您
      0%(0)
  • 差的评价 如果您觉得此文章差,就请您
      0%(0)

文章评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论

广告位置B