03-06-2024
06:18 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
03-06-2024
06:18 AM
Adding edges to Fillet feature
Hello,
Can you add edges to an EdgeCollection used in a FilletFeature? Or do I have to delete the feature and add a new one ?
I've got some iLogic code where I create fillets using .Features.FilletFeatures.AddSimple()
Can I change the FilletFeature.FilletDefinition afterwards?
When I go to FilletFeature.FilletDefinition.EdgeSetItem(Index).edges and use .add() nothing happens even though .count goes up
Even when I change the EOP like mentioned in the help-files: (FilletRadiusEdgeSet Object)
| Property that provides access to the in the edge set. This property is only available when a FilletDefinition object is being defined to use as input for creating a fillet. When the parent FilletDefinition object is obtained from an existing Fillet, the end-of-part marker should be placed above this fillet feature to allow access this property. |
03-07-2024
12:33 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
03-07-2024
12:33 AM
Attached, an example of what I'm trying to do:
A cube with partial fillets that I want to edit so all edges get included in the fillet feature
Dim oPartDoc As PartDocument = ThisDoc.Document
Dim oCompDef As PartComponentDefinition = oPartDoc.ComponentDefinition
Dim oFilletFeature As FilletFeature = oCompDef.Features.FilletFeatures.Item(1)
oFilletFeature.SetEndOfPart(True)
Dim oSurfaceEdges As Edges = oCompDef.SurfaceBodies.Item(1).Edges
Logger.Info(oSurfaceEdges.Count & " edges to add")
Dim oFilletDef As FilletDefinition = oFilletFeature.FilletDefinition
Dim oFilletRadiusEdgeSet As FilletRadiusEdgeSet = oFilletDef.EdgeSetItem(1)
Dim oEdgeColl As EdgeCollection = oFilletRadiusEdgeSet.Edges
Logger.Info(oEdgeColl.Count & " edges in EdgeCollection")
oEdgeColl.Clear
Logger.Info(oEdgeColl.Count & " edges in EdgeCollection")
For Each oEdge As Edge In oSurfaceEdges
oEdgeColl.Add(oEdge)
Next
Logger.Info(oEdgeColl.Count & " edges in EdgeCollection")
oCompDef.SetEndOfPartToTopOrBottom(False)
oPartdoc.UpdateBut nothing happens