Distanzberechnung zwischen 2 Punkten

Gespeichert von Gast am
im Forum ArcGIS
Hallo,

folgendes Problem - das sich eigentlich trivial anhört und hoffentlich auch schnell und einfach zu lösen ist:

Ich habe zwei Shape-Files, mit georeferenzierten Postleitzahlen (Punktdaten), die über eine ID miteinander verknüpft sind (also paarweise einander zugeordnet sind):

Shape/Attributtabelle 1:

ID PLZ1
0 67059
1 76589
2 02365
.. .....
.. .....
usw.

Shape/Attributtabelle 2:

ID PLZ2
0 56734
1 96432
2 23764
.. .....
.. .....
usw.

Nun möchte ich jeweils die Distanz (Meter, Kilometer) zwischen den zusammengehörigen Postleitzahlenpaaren (ID: 0, d.h. Distanz zwischen 67059 und 56734; ID: 1, d.h. Distanz zwischen 76589 und 96432 usw.) automatisiert berechnen.

Gibt es da eine Möglichkeit?

Vielen Dank!

Gruss
Rüdiger

Gespeichert von Maxilla am Do., 11.05.2006 - 16:52

Permalink
Im Zweifelsfalle (Stumpf ist Trumpf) könntest du in beide Shapefiles die Koordinaten schreiben lassen, die Tabellen über die ID joinen und dann im "fiesen Excel-Style" die zwei Koordinatenpaare mittels Pythagoras zu Distanzen verrechnen.

Dieses Tool hier hört sich dahingehend auch ganz vielversprechend an: Point Distance

Gespeichert von Gast am Fr., 12.05.2006 - 10:38

Permalink
Hey Maxilla,

vielen Dank für deinen Support.

Leider kenne ich aber keine Funktion, um mir die Koordinaten der georeferenzierten Postleitzahlen in die Shapefiles schreiben zu lassen...

Bitte um weitere Hilfe!

Gespeichert von Maxilla am Fr., 12.05.2006 - 10:57

Permalink
Am Einfachsten sicherlich mit den XTools Pro.

Oder auch:

- in der Tabelle jedes Shapes 2 neue Doublefelder erstellen (X und Y)
- Mit Rechtsklick auf den jeweiligen Feldnamen "Werte berechnen" öffnen
- Advanced anklicken
- Für X folgendes in die erste

Dim dblX As Double
Dim pPoint As IPoint
Set pPoint = [Shape]
dblX = pPoint.X

und folgendes in die zweite Textbox kopieren

dblX

OK klicken. Für Y entsprechend:

Dim dblY As Double
Dim pPoint As IPoint
Set pPoint = [Shape]
dblY = pPoint.Y

dblY

Den Join der ID-Felder machst du dann in der ArcToolbox über Data Management Tools - Joins - Add Join