[VAD]

Здравствуйте!!! Необходима ваша помощь по следующему вопросу. Имеется таблица (проекция долгота/широта). Из нее необходимо выбрать все точечные объекты. Далее координаты выбранных объектов необходимо записать в текстовый файл построчно
Выбрал так:
Select * from trassa
Where Str$(Obj)="Point"

???

[reasonat]

Open File file_name
For Output As #1

Fetch First From Selection
sel_obj = Selection + ".obj"

Do While not EOT(Selection)
Print #1, ObjectGeography(sel_obj, OBJ_GEO_POINTX) + ", " + ObjectGeography(sel_obj, OBJ_GEO_POINTY)
Fetch Next From Selection
Loop

Close File #1

[Arhara]

кроме того есть путь экспорта таблицы в текстовый файл:

[Alex_47]

{sel_obj = Selection + ".obj"} Насколько я понял SEL_OBJ это строковая переменная не ушто это работает?

[reasonat]

это Alias

[VAD]

Спасибо, все получилось!!!

[xax_nv]

Приветствую всех!
Пришлось поднять этот топик.
Мне нужно получить координаты точечных объектов из MI в Access.
Фрагмент кода:

Set MapInfo = GetObject(, "MapInfo.Application")
MapInfo.Do "Set CoordSys Nonearth units ""m"" Bounds (0.1,0.1) ( 40000,40000)"
MapInfo.Do "Set Distance Units ""m"""

TableName = MapInfo.Eval("SelectionInfo(1)")

MapInfo.Do ("Select * From " & TableName & " Where col3 <> 0")
counter = Val(MapInfo.Eval("SelectionInfo(3)"))

MapInfo.Do ("Fetch First From Selection")
sel_obj = Selection + ".obj"

For j = 1 To counter
kadnum = MapInfo.Eval(TableName & ".col1")
n = MapInfo.Eval(TableName & ".col3")

Y = MapInfo.Eval("ObjectGeography(sel_obj, OBJ_GEO_POINTX)")
X = MapInfo.Eval("ObjectGeography(sel_obj, OBJ_GEO_POINTY)")

Получаю ошибку:
"Преобразовать данные не удалось. ObjectGeography: не правильный тип аргумента 2"
Что не правильно в коде?
Версия MI 7.0

[Андрей Могильный]

OBJ_GEO_POINTX - это константа, описанная в MapBasic.def. Интерпретатор MapBasic в Mapinfo естественно не знает ее значения. Выясните значение и подставляйте его в вызов, а не название константы.

[xax_nv]

Андрей, добрый вечер! А где найти значение? В MapBasic.def я не нашел, правда смотрел в МВ 9.0.

[xax_nv]

Проблема решена, нашел значение констант в МВ 4.5