Hallo aus Georgien!
1. Die Glueckwunsche zum N.J.!
2. Die Frage selbst:
muss ein Programm schreiben zum einlesen von Polyline-Koordinaten und ihr weiteres Speichern in einer Datei. Es funktionirt perfekt, aber gibt mir alle Koordinaten in WCS. Ich aber brauche die in UCS. Wie kann ich es automatisch umrechnen?
Im Code sehen die entsprechenden Zeilen so aus:
coors = obieqti.Coordinates
For i = LBound(coors ) To UBound(coors ) Step n
mytext = R2S(CStr(coors (i)), 2, 1) & ", " & R2S(CStr(coors (i + 1)), 2, 1)
Print #1, mytext
next
... wobei R2S eine "Real to String"-Funktion ist
Offensichtig ist die benuetzte .Coordinates - Methode schuldig. Was kann ich tun?
Danke!
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP