Inventor iLogic, Macros, AddIns & Apprentice Forum. Share your knowledge, ask questions, and explore popular Inventor topics related to programming, creating add-ins, macros, working with the API or creating iLogic tools.
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for
Show only
|
Search instead for
Did you mean:
This page has been translated for your convenience with an automatic translation service. This is not an official translation and may contain errors and inaccurate translations. Autodesk does not warrant, either expressly or implied, the accuracy, reliability or completeness of the information translated by the machine translation service and will not be liable for damages or losses caused by the trust placed in the translation service.Translate
I have an ObjectCollection object that contains a bunch of transient geometry (mostly Cirle2d's and LineSegment2d's). I'm looping through it and performing operations on each object. There are some operations that are different depending on whether the object is a circle or a line. Is there a way to check which type of 2d geometry the object is? Most objects have a "Type" property, but these don't, which is very frustrating.
I have an ObjectCollection object that contains a bunch of transient geometry (mostly Cirle2d's and LineSegment2d's). I'm looping through it and performing operations on each object. There are some operations that are different depending on whether the object is a circle or a line. Is there a way to check which type of 2d geometry the object is? Most objects have a "Type" property, but these don't, which is very frustrating.
I think you can do this (although I haven't tested it). Does that work?
Luke
For Each O In OBJ
Dim testType As String = TypeName(O)
Select Case testType
Case "LineSegment2d"
MsgBox("Line Segment")
Case "Circle2d"
MsgBox("Circle")
End Select
Next
I think you can do this (although I haven't tested it). Does that work?
Luke
For Each O In OBJ
Dim testType As String = TypeName(O)
Select Case testType
Case "LineSegment2d"
MsgBox("Line Segment")
Case "Circle2d"
MsgBox("Circle")
End Select
Next
