[Gambas-user] So cool :-)

[Benoît Minisini]

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