diff --git a/HLCt/recess_angle.SLDPRT b/HLCt/recess_angle.SLDPRT index 52a37b8..3a446f6 100644 Binary files a/HLCt/recess_angle.SLDPRT and b/HLCt/recess_angle.SLDPRT differ diff --git a/HLCt/recess_middle_square.SLDPRT b/HLCt/recess_middle_square.SLDPRT index df2aec9..117d94d 100644 Binary files a/HLCt/recess_middle_square.SLDPRT and b/HLCt/recess_middle_square.SLDPRT differ diff --git a/HLCt/recess_rectangle.SLDPRT b/HLCt/recess_rectangle.SLDPRT index cc551ba..6005fed 100644 Binary files a/HLCt/recess_rectangle.SLDPRT and b/HLCt/recess_rectangle.SLDPRT differ diff --git a/HLCt/recess_side_square.SLDPRT b/HLCt/recess_side_square.SLDPRT index 6610257..fa68598 100644 Binary files a/HLCt/recess_side_square.SLDPRT and b/HLCt/recess_side_square.SLDPRT differ diff --git a/Wardrobe/SolidWorks/Model_3D_Fill.vb b/Wardrobe/SolidWorks/Model_3D_Fill.vb index 168b135..8c08eb8 100644 --- a/Wardrobe/SolidWorks/Model_3D_Fill.vb +++ b/Wardrobe/SolidWorks/Model_3D_Fill.vb @@ -320,6 +320,7 @@ Public Class Model_3D_Fill Assembly.EditPart + Assembly.ClearSelection2(True) boolstatus = AssemblyExtension.SelectByID2("Interference-Body@" & recessPartName & "-1@" & designName, "BODYFEATURE", 0, 0, 0, False, 0, Nothing, 0) modelDoc.EditSuppress2() boolstatus = AssemblyExtension.SelectByID2("Cut-Body@" & recessPartName & "-1@" & designName, "BODYFEATURE", 0, 0, 0, False, 0, Nothing, 0) @@ -336,6 +337,7 @@ Public Class Model_3D_Fill Next Dim gratingComponent As SldWorks.Component2 = components(indexGrating) + Assembly.ClearSelection2(True) Dim bodiesToCut = Check_Interference(recessComponent, gratingComponent, recessPartName & "-1") If bodiesToCut.Length > 0 Then @@ -386,8 +388,10 @@ Public Class Model_3D_Fill modelDoc.EditUnsuppress2() boolstatus = AssemblyExtension.SelectByID2("Cut-Body@" & recessPartName & "-1@" & designName, "BODYFEATURE", 0, 0, 0, False, 0, Nothing, 0) modelDoc.EditUnsuppress2() - Assembly.EditAssembly + End If + Assembly.EditAssembly + boolstatus = modelDoc.EditRebuild3() Next End Sub