German Distanz per lat und lon

M

mcmanu

Active Member

Licensed User

Longtime User

• Jun 10, 2012

• #1

Ist es Möglich die distanz zwischen zwei lat und lon werten zu berechnen?

Beispiel: meine location und zur nächsten stadt
Meine Location lat=48.82342 lon 13,24234 -- nächste stadt 48.2345, 13.23455

Entfernung von mir zur stadt 3,6 km

Hoffe mir kann da jemand weiterhelfen

 

D

Deleted member 103

Guest

• Jun 10, 2012

• #2

Hallo mcmanu,

schau dir diese Seite an Link

es ist sehr gut beschrieben.


Ciao,
Filippo

 

M

mcmanu

Active Member

Licensed User

Longtime User

• Jun 10, 2012

• #3

Danke Filiopo Sieht vielversprechend aus werd mich morgen mal damit auseinander setzten
Danke nochmal

 

klaus

Expert

Licensed User

Longtime User

• Jun 10, 2012

• #4

So ist es einfacher:

B4X:

Dim loc1, loc2 As Location
Dim Distanz As Double 

loc1.Initialize2(48.82342, 13.24234)
loc2.Initialize2(48.2345, 13.23455)
Distanz = loc1.DistanceTo(loc2) / 1000  ' in km

Mit der GPS library.

Mit den Koordinaten die Du gegeben hast ist die Distanz aber weit grösser als 3.6 km!

Beste Grüsse.

 

M

mcmanu

Active Member

Licensed User

Longtime User

• Jun 11, 2012

• #5

Danke Klaus so ist es natürlich sehr leicht Danke dafür
Ja das war jetzt nur ein beispiel mit Phantasie daten