Страница 1 из 1

Примеры задач по mapbasic

Добавлено: 18 ноя 2011, 16:44
Sesc25
Имеется слой полигон, нужно создать профиль(линию) с известными начальными и конечными координатами 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

Как то так вроде но не до конца

скиньте ссылки с примерами типичных задач или пояснения

Re: Примеры задач по mapbasic

Добавлено: 20 ноя 2011, 22:20
Boris
я не понял вам нужно геометрически решить задачу или с использованием функций и операторов 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 )