• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

DelphiXE6调用javascript

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

原文地址:Example of using JavaScript for Google maps in the Delphi XE6

 
XE6的TWebBrowser新增了EvaluateJavaScript方法,这个方法,允许我们与TWebBrowser已经加载的的网页进行交互。这太方便了!作者用一个具体的实例,演示如何调用Google map的API。
 
首先,建立一个网页:
 
const
{ Was used sample from }
{ https://developers.google.com/maps/documentation/javascript/examples/directions-panel }
cRoute =
''
+ ''
+ '  '
+ '    '
+ '    '
+ '    setPanel()'
+ '    '
+ '    '
+ '    
+ '    
+ '  '
+ '  '
+ '    
'
+ '      Start:'
+ '      '
+ '      End:'
+ '      '
+ '    
'
+ '    
 
'
+ '    
 
'
+ '  '
+ '';
 
然后,用一个TWebBrowser调入:
WebBrowser1.LoadFromStrings(cRoute, '');
再声明两个常量:

cChicagoWinona =
    'document.getElementByIdx_x(''start'').value = "chicago, il";'
  + 'document.getElementByIdx_x(''end'').value = "winona, az";'
  + 'calcRoute();';
cStLouisGallupNM =
    'document.getElementByIdx_x(''start'').value = "st louis, mo";'
  + 'document.getElementByIdx_x(''end'').value = "gallup, nm";'
  + 'calcRoute();';
用两个按钮调用:

procedure TForm1.Button1Click(Sender: TObject);
begin 
 WebBrowser1.EvaluateJavaScript(cChicagoWinona); 
end; 
http://blog.sina.com.cn/s/blog_44fa172f0101rhfz.html

鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
安装Matlab出现Error 1935错误解决方法发布时间:2022-07-18
下一篇:
MATLAB学习笔记(七)——MATLAB解方程与函数极值发布时间:2022-07-18
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap