Ottenere l'angolo di inclinazione tra due punti su una MapView rispetto alla latitudine del punto iniziale
Da Gambas-it.org - Wikipedia.
Versione del 17 dic 2019 alle 02:43 di Vuott (Discussione | contributi)
Usando il Componente gb.map, per ottenere l'angolo di inclinazione tra due punti su una MapView rispetto alla direzione nord dell'asse della latitudine del punto iniziale, bisognerà utilizzare il Metodo .Bearing( ) della Classe MapPoint.
Pertanto avremo l'inclinazione, espressa in gradi, della direzione del secondo punto dal primo punto (iniziale).
Mostriamo un esempio pratico (cliccare su un primo punto iniziale e un secondo punto finale):
Private mmpp As New MapPoint[] Public Sub Form_Open() MapView1.Map.AddTile("GoogleMap", "https://khms{s}.google.it/kh/v={version}&src=app&x={x}&y={y}&z={z}&s=Galile", ["version": "859"]).SubDomains = ["0", "1", "2"] End Public Sub MapView1_MouseUp() Dim pt As New Point(Mouse.X, Mouse.Y) If mmpp.count == 2 Then mmpp = New MapPoint[] If Mouse.Right Then mmpp.Push(MapView1.Map.PixelToMapPointRel(pt)) If mmpp.count == 2 Then With MapPoint Print .Bearing(mmpp[0], mmpp[1]); " gradi" End With Endif Endif End