Delphi XE10 加载ArcGIS for Android Jar包, 并成功显示在线地图

研究了一段时间Delphi XE10, 感觉上在android开发方面, UI是比较强的. 由于很多第三方android的开发包, 并没有针对Delphi的, 大多是Jar包所以用起来很麻烦...具体怎么引入jar包到delphi xe10, 请参考另外一篇文章 Delphi XE10 使用百度定位SDK Jar包进行定位, 这里就不再累述了.

ArcGIS for android的jar包比较大, 转换成Pas后, 大概有4万多行代码, 而且还有依赖的其他Jar包, 所以在Pas文件修改上, 着实费了不少功夫.

不过, 最终还是成功了, 截图如下:

大概思路说下:

NOTE: 首要事情, 先搭建一个ArcGIS 在线地图服务, 找到地图服务的地址

1. 创建TJMapView

2. 将TJMapView显示在界面上

3. 创建TJArcGISDynamicMapServiceLayer图层

4. 将TJArcGISDynamicMapServiceLayer图层添加到TJMapView中

欢迎讨论

电子邮箱：[e-mail]