Пытаюсь получить координаты точек, выполняя следующий код:
Код: Выделить всё
Set Map CoordSys NonEarth Units "m" Bounds (609413.2115, 6749861.88848) (609501.4865, 6749924.73195)
Fetch First From Selection
Do While Not EOT(Selection)
MyObj = Selection.obj
If ObjectInfo(myobj, OBJ_INFO_TYPE) = OBJ_POINT Then
X = ObjectGeography(MyObj, OBJ_GEO_POINTX)
Y = ObjectGeography(MyObj, OBJ_GEO_POINTY)
Print "X=" & X
Print "Y=" & Y
end if
Fetch Next From Selection
loop
Традиционный вопрос: что я делаю неправильно?X=5.48087
Y=60.7035