Трубы квадратные и прямоугольные

[Николай]

Программка отрисовывает трубы, производимые Альметьевским АТЗ. Делал для себя, но зачем добру пропадать?
И вообще, если будет работать- сообщите.

[ТрындецЪ]

Замечал неоднократно, что некоторые конструктора и программисты не используют объект "Осевая линия", заменяя её отрезком стилем "осевая". Не пойму, в чём причина? Могу только предположить, что команда появилась не так давно и "старожилы" привыкли строить осевые отрезками.

[Николай]

В данном случае причина в том, что я не знаю, как программно использовать объект "Осевая линия".
Прошу понять. И простить...

[ТрындецЪ]

Код на Python

Код Выделить Развернуть

iAxisLineParam = KAPI.ksAxisLineParam(iKompasObject.GetParamStruct(123)) # ko_AxisLineParam
iAxisLineParam.Init()
iMathPointParam = KAPI.ksMathPointParam(iAxisLineParam.GetBegPoint())
iMathPointParam.Init()
iMathPointParam.x = 0
iMathPointParam.y = 0
iMathPointParam = KAPI.ksMathPointParam(iAxisLineParam.GetEndPoint())
iMathPointParam.Init()
iMathPointParam.x = 100
iMathPointParam.y = 100

iDocument2D.ksAxisLine(iAxisLineParam)

[Николай]

Спасибо за Pyton, но ввиду производственной необходимости программирую на VB, который позиционируется как инструмент для быстрого создания приложений.
Увы и ах!