delphi WebBrowser执行脚本  
官方Delphi 学习QQ群: 682628230(三千人)
频道

delphi WebBrowser执行脚本


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

usesMSHTML;



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


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



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


省去了添加引用的麻烦。
推荐分享
图文皆来源于网络,内容仅做公益性分享,版权归原作者所有,如有侵权请告知删除!
 

Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号

执行时间: 0.1117148399353 seconds