German Was versteht man unter "android.location.Location"-Format ?

cubetennis

Member
Licensed User
Longtime User
Hallo,

wie lautet die richtige Syntax für die Funktion
Location1.DistanceTo("48:44.28", "9:18.30") bzw.
Location1.BearingTo("48:44.28", "9:18.30") ???

wie kann man den Altitude-Wert bekommen
Location1.Altitude ???

Hier ist die Codesequenz aus dem GPS-Tutorial:

Sub GPS_LocationChanged (Location1 As Location)
lblLat.Text = "Lat = " & Location1.ConvertToMinutes(Location1.Latitude)
lblLon.Text = "Lon = " & Location1.ConvertToMinutes(Location1.Longitude)
lblSpeed.Text = "Speed = " & Location1.Speed
lblAltitude.Text = "Altitude = " & Location1.Altitude
lblDistance.Text = "Distance = " & Location1.DistanceTo("48:44.28", "9:18.30")
lblBearing.Text = "Bearing = " & Location1.BearingTo("48:44.28", "9:18.30")
End Sub

Für einen Tipp wäre ich sehr dankbar.

Grüße
 

klaus

Expert
Licensed User
Longtime User
Das Location Objekt enthält die Werte einer Stelle.
Dieses Objekt wird in der GPS_LocationChanged (Location1 AsLocation) übergeben.

Lat = Location1.Latitude
- Der Lat Wert

Lon = Location1.Longitude
- Der Long Wert

Speed = Location1.Speed
- Die Geschwindigkeit gegenüber der vorhergehenden Stelle

Altitude = Location1.Altitude
- Die Höhe

Richtung = Location1.Bearing
- Die Richtung gegenüber der vorhergehenden Stelle

Distanz = Location1.DistanceTo("48:44.28", "9:18.30")
-Distanz von der Location1 Stelle zur Stelle Lat "48:44.28" Lon "9:18.30"

RichtungNach = Location1.BearingTo("48:44.28", "9:18.30")
-Richtung von der Location1 Stelle zur Stelle Lat "48:44.28" Lon "9:18.30"

Beste Grüsse.
 

cubetennis

Member
Licensed User
Longtime User
Hallo Klaus,

vielen Dank für die Erklärung.
Habe denn noch folgende Fragen:

1. Warum zeigt diese Codezeile
lblAltitude.Text = "Altitude = " & Location1.Altitude
bei der Ausführung des Programms gar nicht an ?
(HTC Desire Android 2.1, Basic4android 1.10)

2. Warum gibt der Compiler bei dieser Codezeile
lblDistance.Text = "Distance = " & Location1.DistanceTo("48:44.28", "9:18.30")
folgende Fehlermeldung aus ?

Error description: Too many parameters.
Occurred on line: 42
lblDistance.Text = "Distance = " & Location1.DistanceTo("48:44.28", "9:18.30")
Wie lautet die richtige Syntax ?

Für eine Hilfe wäre ich Dir sehr dankbar.

Grüße
 

corwin42

Expert
Licensed User
Longtime User
2. Warum gibt der Compiler bei dieser Codezeile
lblDistance.Text = "Distance = " & Location1.DistanceTo("48:44.28", "9:18.30")
folgende Fehlermeldung aus ?
DistanceTo benötigt ein zweites Location Objekt als Parameter. Also z.B.

B4X:
Dim Location2 as Location
Location2.Initialize2("48:44.28", "9:18.30")

lblDistance.Text = "Distance = " & Location1.DistanceTo(Location2)
 

klaus

Expert
Licensed User
Longtime User
1. Warum zeigt diese Codezeile
lblAltitude.Text = "Altitude = " & Location1.Altitude
bei der Ausführung des Programms gar nicht an ?
(HTC Desire Android 2.1, Basic4android 1.10)
Versuche mal mit Location1.AltitudeValid zu testen ob ein gültiger Höhenwert zur Verfügung steht.

Beste Grüsse.
 
Cookies are required to use this site. You must accept them to continue using the site. Learn more…