diff --git a/HLCt/Parts/START.SLDPRT b/HLCt/Parts/START.SLDPRT index 9e155b4..6edee33 100644 Binary files a/HLCt/Parts/START.SLDPRT and b/HLCt/Parts/START.SLDPRT differ diff --git a/HLCt/Parts/~$START.SLDPRT b/HLCt/Parts/~$START.SLDPRT new file mode 100644 index 0000000..b07f2ee Binary files /dev/null and b/HLCt/Parts/~$START.SLDPRT differ diff --git a/HLCt/frame_l_straight.SLDPRT b/HLCt/frame_l_straight.SLDPRT index 989c849..40684af 100644 Binary files a/HLCt/frame_l_straight.SLDPRT and b/HLCt/frame_l_straight.SLDPRT differ diff --git a/HLCt/pressure_welded.SLDPRT b/HLCt/pressure_welded.SLDPRT index 62cd322..6c48880 100644 Binary files a/HLCt/pressure_welded.SLDPRT and b/HLCt/pressure_welded.SLDPRT differ diff --git a/HLCt/type_a.SLDPRT b/HLCt/type_a.SLDPRT index 33bf589..e1bda21 100644 Binary files a/HLCt/type_a.SLDPRT and b/HLCt/type_a.SLDPRT differ diff --git a/Wardrobe/GUI/Individual.vb b/Wardrobe/GUI/Individual.vb index 2409d37..47bd2ee 100644 --- a/Wardrobe/GUI/Individual.vb +++ b/Wardrobe/GUI/Individual.vb @@ -250,7 +250,7 @@ Public Class Individual Model_3D_Fill.BuildGrid() Else - 'Model_3D.BuildGrating() + Model_3D.BuildGrating() Drawing.Create_Model_For_Drawing() End If End Sub diff --git a/Wardrobe/SolidWorks/Model_3D.vb b/Wardrobe/SolidWorks/Model_3D.vb index e9b7137..bf4d25b 100644 --- a/Wardrobe/SolidWorks/Model_3D.vb +++ b/Wardrobe/SolidWorks/Model_3D.vb @@ -12,7 +12,8 @@ Public Class Model_3D Dim inst_ As Integer Dim parentID As Integer = 0 Dim gratingParameters As DataRow = exportTable.Rows(0) - inst_ = ExternalClass.instantiate_parts(parentID, gratingParameters("TYPE"), "") ' Ange pressure_welded eller type A, Serrated? + + inst_ = ExternalClass.instantiate_parts(parentID, gratingParameters("TYPE"), "") ExternalClass.modify_parameter_value("DP_GRATING_WIDTH", inst_, gratingParameters("WIDTH")) ExternalClass.modify_parameter_value("DP_GRATING_LENGTH", inst_, gratingParameters("LENGTH")) ExternalClass.modify_parameter_value("DP_LOADBAR_THICKNESS", inst_, gratingParameters("LOADBAR_THICKNESS"))