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;


省去了添加引用的麻烦。

相关阅读 >>

Delphi webservices 字节数组 base64编码

Delphi xe6 读取android设备联系人

Delphi 资源文件管理 resources and images

Delphi twebbrowser流程讲解及如何判断下载网页成功

Delphi实现背景音乐播放

Delphi xe7实现手机上获取wifi信息的程序

Delphi 官方提供的六十多个firedac例子

Delphi 建立最小的应用程序

Delphi 获取内网所有ip地址

Delphi shellexecute执行cmd命令窗口不关闭

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...