Есть ли настройка для нумерации и переназначении ее для вершин

[Darsh]

В 3D Max для сплайновых объектов есть возможность показать номер вершины и при желании любую вершину переназначить первой. Интересует подобное же для вектора в Corel Draw X4. Знаю что можно разбить вершину и сразу же соединить что приведет к желаемому результату, а есть ли другие варианты?

P.s. Предвещая вопрос "Для чего это нужно?", отвечаю требования оператора фрезерного станка делать определенные вершины (точнее вершины в определенных местах) первыми, дабы именно там происходило вхождение фрезы в материал.

 

[_MBK_]

Ответ: Есть ли настройка для нумерации и переназначении ее для вершин

Ну можно, конечно, простецкий макрос сделать под это дело, но по-моему это то на то и выйдет. По времени запуска - что разбить, что макрос запустить - экономия в один клик мышью.

 

[_MBK_]

Ответ: Есть ли настройка для нумерации и переназначении ее для вершин

Вот как-то так:

Sub SetFirstNode()

    Dim OrigSelection As ShapeRange
    Set OrigSelection = ActiveSelectionRange
   
    Set sel = OrigSelection.Shapes(1).Curve.Selection()
    Set n = sel(1)
    If n.Index <> 1 Then
     n.BreakApart
     Set nd = OrigSelection.Shapes(1).Curve.Nodes
     nd.First.ConnectWith (nd.Last)
    End If
End Sub

 

[Darsh]

Ответ: Есть ли настройка для нумерации и переназначении ее для вершин

Спасибо за макрос, тему можно закрывать.