AnsweredAssumed Answered

Deafault K factor changing

Question asked by Piotr Tetlak on Aug 19, 2016
Latest reply on Aug 19, 2016 by Piotr Tetlak

Hello!

 

I know that similar topic already have been discussed on that forum. Unfortunately I didn't find clear answer how to change default K-factor in SheetMetal part.

 

Could somebody explain me why example below doesn't work properly:

=====================================================================================

Option Explicit

 

    Dim swApp                             As SldWorks.SldWorks

    Dim swModel                           As SldWorks.ModelDoc2

     Dim swFeat                            As SldWorks.Feature

    Dim swBaseFlange                 As SldWorks.BaseFlangeFeatureData

    Dim swSheetMetal                 As SldWorks.SheetMetalFeatureData

 

Sub main()

    Set swApp = Application.SldWorks

    Set swModel = swApp.ActiveDoc

    

    Set swFeat = swModel.FirstFeature

 

      Do While Not swFeat Is Nothing

        If swFeat.GetTypeName = "SheetMetal" Then

     

                  Set swSheetMetal = swFeat.GetDefinition

                  swSheetMetal.AccessSelections swModel, Nothing

                  swSheetMetal.BendAllowanceType = 2

                  swSheetMetal.Kfactor = 0.2

 

                  swFeat.ModifyDefinition swSheetMetal, swModel, Nothing

                   End If

 

 

    Set swFeat = swFeat.GetNextFeature

    Loop

 

    swModel.ForceRebuild3 False

    swModel.Save

End Sub

===============================================

The K-factor value is changed in model but I have to click "Override default value" in sheet menu. That is very unacceptable for me.

I would really appreciate if smb could explain me how to change Default K-factor value.

 

 

==================================================

After some time I've found out that I need to edit kfactor of SheetMetalTemplate, not particular SheetMetal.

Using loop:

@

Do While Not swFeat Is Nothing

        If swFeat.GetTypeName = "SheetMetal" Then

@

 

I am not able to get SheetMetalTemplate object.

Does anyone have any idea how to get it?

 

Wiadomość była edytowana przez: Piotr Tetlak

Outcomes