08-17-2018
12:38 PM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
08-17-2018
12:38 PM
You are right regarding latest versions (2018 don't "see" auxiliary Sketch at all)
yet... Inventor 2014 returns False value of IsOwnedByFeature for all sketches (seems not very useful property).
Dim oCompdef As PartComponentDefinition oCompdef = ThisDoc.Document.ComponentDefinition Dim MsgBody As String Dim AboveEoP_SkCount As Integer=0 For Each oSketch As Sketch In oCompDef.Sketches If oSketch.HealthStatus<>HealthStatusEnum.kBeyondStopNodeHealth Then AboveEoP_SkCount=AboveEoP_SkCount+1 MsgBody=MsgBody & " " & oSketch.Name & " - " & oSketch.IsOwnedByFeature & vbCrLf Else Exit For End If Next MsgBox (MsgBody,,"Out of " & oCompDef.Sketches.Count & " sketches " & AboveEoP_SkCount & " are placed above EoP: ")
I guess you then have no other recommendation but move to newest Inventor, right?
Please vote for Inventor-Idea Text Search within Option Names