Получение координат HybridShapeIntersection

[SoHm]

я новичок в Катии так что мб глуплю, но возникла такая проблема - получение координат точек. Вобщм построено пересечение, на нем несколько обьектов типа HybridShapeIntersection, нужно получить координаты каждой. Дело в том что HybridShapeIntersection вроде и точками не являются как мне подсказали. Вобщем создала каждому intersection по "копии" с помощью AddNewPointCoordWithReference(эт вроде точками являются), а координаты нули. Меняю PtRef, RefAxis на дефолтные - все равно не дает координат. Кто сталкивался с подобным или что-то знает по теме оченьоченьочень прошу подсказок

[booSter]

Что-то похожее уже пробегало...
Посмотри здесь...

[Artem]

Код: Выделить всё

Dim dC(2) As Variant
CATIA.ActiveDocument.selection.Clear
CATIA.ActiveDocument.selection.Search "CATPrtSearch.Point.Name='Point.1',all"
CATIA.ActiveDocument.selection.Item(1).Value.GetCoordinates dC
MsgBox CStr(dC(0)) + "   " + CStr(dC(1)) + "   " + CStr(dC(2))

.....CATIA.ActiveDocument.selection.Item(1).GetCoordinates - не работает (нули выводит).Сдесь происходит как-бы приведение обьекта типа "поинт сделанный как-нибудь на чем-нибудь" у которого getcoordinates корявый к обычному поинту и с него уже нормально снимаются координаты.

[SoHm]

Спасибо за помощь! все работает