Fl��che von Bohrung herausfinden / Inventor .NET
mssoftware 22. Feb. 2012, 12:29

Hallo zusammen,

wie kann ich herausfinden, welche Fläche eine Bohrung bzw die Skizze dazu benutzt?
Ich wähle in einem Teil eine Fläche aus und möchte nun alle Bohrungen herausfiltern, die auf dieser Fläche liegen. Die Programmierung sieht im Moment so aus:

Code:
  oIVPart = oInventorApp.ActiveDocument

'ausgewählte Fläche zuweisen           
Dim oselectset As Inventor.SelectSet = oIVPart.SelectSet
            If oselectset.Count > 0 Then
                If TypeOf oselectset.Item(1) Is Inventor.Face Then
                    Dim oface As Inventor.Face = oselectset.Item(1)
                    ' Referenz zur component definition.
                    Dim oCompDef As Inventor.PartComponentDefinition
                    oCompDef = oIVPart.ComponentDefinition

'alle Bohrungen durchgehen und prüfen ob sie auf der ausgewählten Fläche liegen
                    Dim ohole As Inventor.HoleFeature
                    For Each ohole In oCompDef.Features.HoleFeatures
                        If ohole.SurfaceBodies.Item(1).Faces.Item(1) Is oface Then
                            Debug.WriteLine(ohole.HoleDiameter.Value * 10)
                        End If

                    Next


                End If

            End If


Bei:

Code:
If ohole.SurfaceBodies.Item(1).Faces.Item(1) Is oface Then
liegt mein Problem, ich finde nicht heraus, welche Eigenschaft die Fläche zurück gibt, auf der die Skizze für die Bohrung liegt...

Gruß

Maik

mssoftware 22. Feb. 2012, 12:43

schon gefunden:

Code:
Dim osketchface As Inventor.Face = ohole.Sketch.PlanarEntity
                    If osketchface Is oface Then
                        Debug.WriteLine(ohole.HoleDiameter.Value * 10)
                    End If