ADN Club > Inventor API

Сортировка компонентов в браузере сборки по типу компонентов

(1/1)

niksasa:
Добрый день. Возможна ли сортировка компонентов в браузере по типу компонентов с помощью API. Альфа-сортировка не совсем подходит.

Владимир Ананьев:
А если разложить компоненты по специально созданным папкам? 
Кое-какой API для этого имеется.  В хелпе есть вот такой пример:

--- Код: ---Public Sub AddOccurrencesToFolder()
    Dim oDoc As AssemblyDocument
    Set oDoc = ThisApplication.ActiveDocument

    Dim oDef As AssemblyComponentDefinition
    Set oDef = oDoc.ComponentDefinition

    Dim oPane As BrowserPane
    Set oPane = oDoc.BrowserPanes.ActivePane

    Dim oOccurrenceNodes As ObjectCollection
    Set oOccurrenceNodes = ThisApplication.TransientObjects.CreateObjectCollection

    Dim oOcc As ComponentOccurrence
    For Each oOcc In oDef.Occurrences

        Dim oNode As BrowserNode
        Set oNode = oPane.GetBrowserNodeFromObject(oOcc)

        oOccurrenceNodes.Add oNode
    Next

    Dim oFolder As BrowserFolder
    Set oFolder = oPane.AddBrowserFolder("My Occurrence Folder", oOccurrenceNodes)
End Sub
--- Конец кода ---
Кроме того, можно и сортировать браузер. 
Есть метод BrowserPane.Reorder. 

--- Код: ---BrowserPane.Reorder( TargetNode As BrowserNode, Before As Boolean, StartNode As BrowserNode, [EndNode] As Variant )
--- Конец кода ---
Ведь если отладить своп для пары соседних узлов,
то можно реализовать сортировку любым доступным методом. 

Алексей Романов:
Если честно, пока не понимаю причин для сортировки элементов в браузере, просто использую папки...

Навигация

[0] Главная страница сообщений