Re: Get number of bends from ComponentOccurrence if it's a Sheet Metal Part - AP

Дата публикации: 16-01-2020 17:01:03

Ah. Use ObjectTypeEnum.kSheetMetalComponentDefinitionObject instead.
Dim _invApp As Inventor.Application
_invApp = Marshal.GetActiveObject("Inventor.Application")' Inventor must be running
Dim asmDoc As AssemblyDocument
asmDoc = _invApp.ActiveDocument


Dim selSet As SelectSet
selSet = asmDoc.SelectSet
Try
Dim compOcc As ComponentOccurrence
Dim obj As Object
For Each obj In selSet
compOcc = obj
MsgBox(compOcc.Definition.Document.PropertySets.Item("Design Tracking Properties").Item("Part Number").Value)

' Get number of bends if item is sheet metal
Dim nBends As Long
If compOcc.Definition.Type = ObjectTypeEnum.kSheetMetalComponentDefinitionObject Then nBends = compOcc.Definition.Bends.Count
Next
Catch ex As Exception
MsgBox("Is the selected item a Component?")
MsgBox(ex.ToString())
Return
End Try

Схожие новости

#	Наименование новости	Тональность	Информативность	Дата публикации
1	Власти Колумбии одобрили экстренное использование вакцины от коронавируса Janssen	0	0	26-03-2021

Классификация: . Схожих патентов: 0. Схожая новость: 1. Тональность: 0. Информативность: 0. Источник: forums.autodesk.com.