Rendere trasparente la mappa mostrata da una MapView
E' possibile rendere trasparente la mappa mostrata da una MapView, al fine ad esempio di far vedere contemporaneamente e al di sotto di tale oggetto un'altra immagine. [Nota 1]
Essenzialmente è necessario assegnare alla Proprietà "MapView.Background" il valore della costante Color.Transparent, e assegnare alla Proprietà "MapView.Map.Opacity" un valore compreso tra 0,00 e 1,00.
Mostriamo di seguito un semplice esempio, nel quale si farà vedere un'immagine, caricata in un oggetto PictureBox, al di sotto della mappa dell'isola di Linosa, ripresa da satellite, mostrata su una MapView.
Inoltre, cliccando su un qualunque punto dell'oggetto MapView (compresa la parte sovrastante la PictureBox, saranno mostrate in console le coordinate geografiche del punto cliccato con il puntatore del mouse. [Nota 2]
Public Sub Form_Open() With PictureBox1 ' Assegnamo la "PictureBox come oggetto nuovo "figlio" della "MapView": .Reparent(MapView1, 0, 0) ' Gerarchicamente poniamo la "PictureBox al di sotto del suo nuovo "genitore": .Lower() .Picture = Picture.Load(".icon.png") .W = .Picture.W .H = .Picture.H End With With MapView1 .Background = Color.Transparent .Map.AddTile("GoogleMaps", "https://khms{s}.google.it/kh/v={version}&src=app&x={x}&y={y}&z={z}&s=Galile", ["version": "934"]) .Map["GoogleMaps"].SubDomains = ["0", "1", "2"] .Map["GoogleMaps"].Opacity = 0.6 .Map.Center = MapPoint(35.8552054, 12.8692769) .Map.Zoom = 14 End With End Public Sub MapView1_MouseUp() Dim pt As New Point(Mouse.X, Mouse.Y) Print "Lat. "; Geo.DecToSex(MapView1.Map.PixelToMapPointRel(pt).Lat, 1); " - Lon. "; Geo.DecToSex(MapView1.Map.PixelToMapPointRel(pt).Lon, 2) End
Note
[1] Si ringrazia il membro Gianluigi per il suo contributo di idee.
[2] Qualora la mappa non appaia, verificare la versione GoogleMap, ed eventualmente modificarla in questo punto del codice: ["version": "934"]
Al riguardo vedere: Conoscere la versione più recente di Google Maps satellite