Я вроде отвечал уже... повторю еще:
пример из хелпа:
Dim new_line as New MapObjects2.LineDim pts As New MapObjects2.PointsDim pt As New MapObjects2.Point
pt.X = 100pt.Y = 100pts.Add pt
pt.X = 200pt.Y = 200pts.Add pt
new_line.Parts.Add pts
9,052 вопросов
30,234 ответов
439 комментариев
2,254 пользователей