Имеется слой полигон, нужно создать профиль(линию) с известными начальными и конечными координатами XначYнач Xкон Yкон, и найти точки пересечения линии с полигоном
преподаватель задал...решить на языке mapbasic
include "mapbasic.def"
Declare Sub Main
Sub Main
Dim x1, y1, x2, y2 x3, y3, x4, y4 As Float
Open Table "poligon.tab"
Insert Into poligon (obj)
Values (CreateLine (Xнач, Yнач, Xкон, Yкон))
End Sub
Как то так вроде но не до конца
скиньте ссылки с примерами типичных задач или пояснения
Примеры задач по mapbasic
-
- Новоприбывший
- Сообщения: 7
- Зарегистрирован: 18 ноя 2011, 16:14
- Репутация: 0
Примеры задач по mapbasic
Последний раз редактировалось Sesc25 23 ноя 2011, 20:04, всего редактировалось 2 раза.
-
- Гуру
- Сообщения: 4231
- Зарегистрирован: 10 апр 2006, 22:34
- Репутация: -344969098
- Откуда: Париж
Re: Примеры задач по mapbasic
я не понял вам нужно геометрически решить задачу или с использованием функций и операторов MapInfo/mapBasic ?
это абсолютно два разных пути, т.к. пространственные операторы УЖЕ встроены в MapInfo/mapBasic.
вот элементарное решение задачи:
это абсолютно два разных пути, т.к. пространственные операторы УЖЕ встроены в MapInfo/mapBasic.
вот элементарное решение задачи:
Код: Выделить всё
Overlap( ) function
Purpose
Returns an object representing the geographic intersection of two objects; produces results similar to MapInfo Professional's Objects > Erase Outside command. You can call this function from the MapBasic Window in MapInfo Professional.
Syntax
Overlap( object1, object2 )
Кто сейчас на конференции
Сейчас этот форум просматривают: нет зарегистрированных пользователей и 3 гостя