Le 07/01/2016 17:42, Fabien Bodard a écrit : > Public Sub Form_Open() > > Dim sMap As String > > MapView1.AllowEffect = False > sMap = "http://apicarto-dev.sgmap.fr/maps" & > > "/wmts?SERVICE=WMTS&REQUEST=GetTile&VERSION=1.0.0&LAYER=ORTHOIMAGERY.ORTHOPHOTOS&STYLE=normal&TILEMATRIXSET=PM&TILEMATRIX={z}&TILEROW={y}&TILECOL={x}&FORMAT=image%2Fjpeg" > > MapView1.Map.AddTile("IGN", sMap).Copyright = "IGN" > > sMap = "http://apicarto-dev.sgmap.fr/maps" & > > "/wmts?SERVICE=WMTS&REQUEST=GetTile&VERSION=1.0.0&LAYER=CADASTRALPARCELS.PARCELS&STYLE=bdparcellaire_b&TILEMATRIXSET=PM&TILEMATRIX={z}&TILEROW={y}&TILECOL={x}&FORMAT=image%2Fpng&TRANSPARENT=TRUE';" > > MapView1.Map.AddTile("Cadastre", sMap).Copyright = "IGN" > MapView1.Map.MaxZoom = 19 > > > End >
Toujours sur la carto ? Ça risque de m'intéresser... Ces cartes sont en WGS (je peux prendre des coordonnées WGS84 et les mettre directement dessus) ? En plus maintenant il y a le composant gb.web.form, il mérite bien d'avoir un contrôle "OpenStreetMap"... -- Benoît Minisini ------------------------------------------------------------------------------ _______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user