Перейти к публикации

Макрос vba Solidworks ( использование параметров листового металла из материала)


Sergej0895

Рекомендованные сообщения

Добрый день.

Помогите пожалуйста сделать макрос на Solidworks. Нужно, чтобы в дереве построения листовой детали, в параметрах листового тела - проставлялась галочка "Использовать параметры материала для листового металла" (для активной 3D модели). 

Автоматическая запись макроса не распознает данную операцию, а в справке по API данного параметра не нашел (по крайней мере с моим знанием английского). Нашел только как данную галочку поставить в свойствах для новых деталей, но это немного не то (прилагаю код ниже).

 

Dim swApp As Object

Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long

Sub main()

Set swApp = Application.SldWorks

Set Part = swApp.ActiveDoc
boolstatus = Part.Extension.SetUserPreferenceToggle(swUserPreferenceToggle_e.swSheetMetalUseMaterial, 0, True)
End Sub

Ссылка на сообщение
Поделиться на других сайтах


UnPinned posts

Возможно вам нужно смотреть в сторону методов листового металла ( насколько я помню это  sheet metal feature) 

Ссылка на сообщение
Поделиться на других сайтах
21.01.2022 в 15:39, Sergej0895 сказал:

а в справке по API данного параметра не нашел

Он там есть.

https://help.solidworks.com/2022/english/api/sldworksapi/solidworks.interop.sldworks~solidworks.interop.sldworks.isweptflangefeaturedata~usematerialsheetmetalparameters.html

Ссылка на сообщение
Поделиться на других сайтах
21 час назад, Sturmann сказал:

Возможно вам нужно смотреть в сторону методов листового металла

Возможно ка кто добавить код в Geometrika или доп макрос, для постановки параметров листовой детали, масса, площадь, размеры основные.

Ну и главное что это листовая деталь. Вообще для анализа ка кто что это цилиндр, это лист, это профиль, это болванка? Возможно такое ? Анализ сделать?

Изменено пользователем Maik812
Ссылка на сообщение
Поделиться на других сайтах
2 часа назад, streamdown сказал:

Да, похоже это оно, но почему-то все равно не выходит. Команда не срабатывает, а попросту игнорируется... Видно что-то я все же делаю не так..

Ссылка на сообщение
Поделиться на других сайтах

Смысл вообще в том, чтобы при запуске просто прожималась галочка "Использовать параметры материала для листового металла", а там уже подвязана соответствующая таблица сгибов (для каждого материала своя таблица). Далее, сохранять развертку в формате dxf и все это дело организовать в пакетную обработку.

Ссылка на сообщение
Поделиться на других сайтах

@Sergej0895 Покажите код макроса, может совместными усилиями и получиться что-то сделать.

Ссылка на сообщение
Поделиться на других сайтах
21.01.2022 в 15:39, Sergej0895 сказал:

Добрый день.

Помогите пожалуйста сделать макрос на Solidworks. Нужно, чтобы в дереве построения листовой детали, в параметрах листового тела - проставлялась галочка "Использовать параметры материала для листового металла" (для активной 3D модели). 

Автоматическая запись макроса не распознает данную операцию, а в справке по API данного параметра не нашел (по крайней мере с моим знанием английского). Нашел только как данную галочку поставить в свойствах для новых деталей, но это немного не то (прилагаю код ниже).

 

Dim swApp As Object

Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long

Sub main()

Set swApp = Application.SldWorks

Set Part = swApp.ActiveDoc
boolstatus = Part.Extension.SetUserPreferenceToggle(swUserPreferenceToggle_e.swSheetMetalUseMaterial, 0, True)
End Sub

Что то у меня такое смутное сомнение что этот код подучился в результате записи макроса. Запись иной раз очень много пропускает или записывает для "здесь и сейчас".

 

Ссылка на сообщение
Поделиться на других сайтах

Попробовал взять этот безумный код из примера справки API (с созданием листовой детали с нуля), добавил строчку применения материала, поставил значение "True" для параметра "UseMaterialSheetMetalParameters" (в конце кода), но увы, это тоже не приводит к нужному результату.

 

Dim swApp As SldWorks.SldWorks
Dim swFeat As SldWorks.Feature
Dim myFeature As SldWorks.Feature
Dim swFeatMgr As SldWorks.FeatureManager
Dim swFeatData As SldWorks.SweptFlangeFeatureData
Dim customBendAllowanceData As SldWorks.CustomBendAllowance
Dim swProfileSketch As SldWorks.Feature
Dim skSegment As SldWorks.SketchSegment
Dim Part As SldWorks.ModelDoc2
Dim swPart As PartDoc
Dim boolstatus As Boolean
Dim longstatus As Long

Option Explicit

Sub main()

    Set swApp = Application.SldWorks
      
    Dim swSheetWidth As Double
    swSheetWidth = 0
    Dim swSheetHeight As Double
    swSheetHeight = 0
    Set Part = swApp.NewDocument("C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\lang\english\Tutorial\part.prtdot", 0, swSheetWidth, swSheetHeight)
   
    Set swPart = Part
    swApp.ActivateDoc2 "Part1", False, longstatus
    Set Part = swApp.ActiveDoc
   
    Part.SketchManager.InsertSketch True
    boolstatus = Part.Extension.SelectByID2("Front", "PLANE", -3.50345417518034E-02, 0.019677523162802, 5.11863136830445E-03, False, 0, Nothing, 0)
    Part.ClearSelection2 True
    boolstatus = Part.Extension.SetUserPreferenceToggle(swUserPreferenceToggle_e.swSketchAddConstToRectEntity, swUserPreferenceOption_e.swDetailingNoOptionSpecified, False)
    boolstatus = Part.Extension.SetUserPreferenceToggle(swUserPreferenceToggle_e.swSketchAddConstLineDiagonalType, swUserPreferenceOption_e.swDetailingNoOptionSpecified, True)
    Dim vSkLines As Variant
    vSkLines = Part.SketchManager.CreateCornerRectangle(-4.20403557341645E-02, 2.75066828701494E-02, 0, 4.75026757367474E-02, -2.20443628675665E-02, 0)
    Part.ClearSelection2 True

    Part.ShowNamedView2 "*Trimetric", 8
    Part.ViewZoomtofit2
   
    Set customBendAllowanceData = Part.FeatureManager.CreateCustomBendAllowance()
    customBendAllowanceData.KFactor = 0.5
   
    Set myFeature = Part.FeatureManager.InsertSheetMetalBaseFlange2(0.0007366, False, 0.0007366, 0.02, 0.01, False, 0, 0, 1, customBendAllowanceData, False, 0, 0.0001, 0.0001, 0.5, True, False, True, True)
   
    Part.ClearSelection2 True
    Part.SketchManager.InsertSketch True
    boolstatus = Part.Extension.SelectByID2("", "FACE", 4.41584745988735E-02, 2.75066828701256E-02, -2.52375262334681E-04, True, 0, Nothing, 0)
   
    Set skSegment = Part.SketchManager.CreateLine(0.047503, 0#, 0#, 0.047503, -0.015713, 0#)
    Part.ClearSelection2 True
    Part.SketchManager.InsertSketch True
   
    boolstatus = Part.Extension.SelectByID2("Sketch6", "SKETCH", 2.54585357375204E-02, -3.78791126417555E-03, -0.013876316631307, True, 0, Nothing, 0)
    boolstatus = Part.Extension.SelectByRay(4.72949686339916E-02, 1.33307046879168E-02, 2.07707102561017E-04, -0.499999999999997, -0.707106781186554, -0.499999999999995, 4.23592175091009E-04, 1, True, 0, 0)
    Part.ClearSelection2 True
   
    boolstatus = Part.Extension.SelectByID2("Sketch6", "SKETCH", 2.54585357375204E-02, -3.78791126417555E-03, -0.013876316631307, True, 0, Nothing, 0)
    Set swProfileSketch = Part.SelectionManager.GetSelectedObject6(1, -1)
    Part.ClearSelection2 True
   
    Dim swPathObj As Object
    Dim pathObjsArray(0) As Object
    boolstatus = Part.Extension.SelectByRay(4.72949686339916E-02, 1.33307046879168E-02, 2.07707102561017E-04, -0.499999999999997, -0.707106781186554, -0.499999999999995, 4.23592175091009E-04, 1, True, 0, 0)
    Set swPathObj = Part.SelectionManager.GetSelectedObject6(1, -1)
    Set pathObjsArray(0) = swPathObj
    Dim pathObjsVar As Variant
    pathObjsVar = pathObjsArray
    Part.ClearSelection2 True
  

Part.SetMaterialPropertyName2 "По умолчанию", "C:/ProgramData/SolidWorks/SOLIDWORKS 2021/Настроенный пользователем материал/Настроенный пользователем материал.sldmat", "Простая углеродистая сталь (Кор.)"
  
  

    Set swFeatMgr = Part.FeatureManager
  
    Set swFeatData = swFeatMgr.CreateDefinition(swFeatureNameID_e.swFmSweptFlange)
    swFeatData.EndOffset = 0
    swFeatData.FlangePosition = swSweptFlangePositionType_MaterialInside
    swFeatData.FlattenAlongPath = False
    swFeatData.OverrideDefaultSheetMetalParameters = False
    swFeatData.Path = pathObjsVar
    swFeatData.Profile = swProfileSketch
    swFeatData.ReverseDirection = False
    swFeatData.StartOffset = 0
    swFeatData.TrimSideBends = False
    swFeatData.UseDefaultBendAllowance = True
    swFeatData.UseDefaultBendRelief = True
    swFeatData.UseDefaultRadius = False
    swFeatData.UseGaugeTable = False
    swFeatData.UseMaterialSheetMetalParameters = True
    Set swFeat = swFeatMgr.CreateFeature(swFeatData)
    Part.ClearSelection2 True
    End Sub

Ссылка на сообщение
Поделиться на других сайтах
9 часов назад, Sergej0895 сказал:

Попробовал взять этот безумный код из примера справки API (с созданием листовой детали с нуля), добавил строчку применения материала, поставил значение "True" для параметра "UseMaterialSheetMetalParameters" (в конце кода), но увы, это тоже не приводит к нужному результату.

 

Dim swApp As SldWorks.SldWorks
Dim swFeat As SldWorks.Feature
Dim myFeature As SldWorks.Feature
Dim swFeatMgr As SldWorks.FeatureManager
Dim swFeatData As SldWorks.SweptFlangeFeatureData
Dim customBendAllowanceData As SldWorks.CustomBendAllowance
Dim swProfileSketch As SldWorks.Feature
Dim skSegment As SldWorks.SketchSegment
Dim Part As SldWorks.ModelDoc2
Dim swPart As PartDoc
Dim boolstatus As Boolean
Dim longstatus As Long

Option Explicit

Sub main()

    Set swApp = Application.SldWorks
      
    Dim swSheetWidth As Double
    swSheetWidth = 0
    Dim swSheetHeight As Double
    swSheetHeight = 0
    Set Part = swApp.NewDocument("C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\lang\english\Tutorial\part.prtdot", 0, swSheetWidth, swSheetHeight)
   
    Set swPart = Part
    swApp.ActivateDoc2 "Part1", False, longstatus
    Set Part = swApp.ActiveDoc
   
    Part.SketchManager.InsertSketch True
    boolstatus = Part.Extension.SelectByID2("Front", "PLANE", -3.50345417518034E-02, 0.019677523162802, 5.11863136830445E-03, False, 0, Nothing, 0)
    Part.ClearSelection2 True
    boolstatus = Part.Extension.SetUserPreferenceToggle(swUserPreferenceToggle_e.swSketchAddConstToRectEntity, swUserPreferenceOption_e.swDetailingNoOptionSpecified, False)
    boolstatus = Part.Extension.SetUserPreferenceToggle(swUserPreferenceToggle_e.swSketchAddConstLineDiagonalType, swUserPreferenceOption_e.swDetailingNoOptionSpecified, True)
    Dim vSkLines As Variant
    vSkLines = Part.SketchManager.CreateCornerRectangle(-4.20403557341645E-02, 2.75066828701494E-02, 0, 4.75026757367474E-02, -2.20443628675665E-02, 0)
    Part.ClearSelection2 True

    Part.ShowNamedView2 "*Trimetric", 8
    Part.ViewZoomtofit2
   
    Set customBendAllowanceData = Part.FeatureManager.CreateCustomBendAllowance()
    customBendAllowanceData.KFactor = 0.5
   
    Set myFeature = Part.FeatureManager.InsertSheetMetalBaseFlange2(0.0007366, False, 0.0007366, 0.02, 0.01, False, 0, 0, 1, customBendAllowanceData, False, 0, 0.0001, 0.0001, 0.5, True, False, True, True)
   
    Part.ClearSelection2 True
    Part.SketchManager.InsertSketch True
    boolstatus = Part.Extension.SelectByID2("", "FACE", 4.41584745988735E-02, 2.75066828701256E-02, -2.52375262334681E-04, True, 0, Nothing, 0)
   
    Set skSegment = Part.SketchManager.CreateLine(0.047503, 0#, 0#, 0.047503, -0.015713, 0#)
    Part.ClearSelection2 True
    Part.SketchManager.InsertSketch True
   
    boolstatus = Part.Extension.SelectByID2("Sketch6", "SKETCH", 2.54585357375204E-02, -3.78791126417555E-03, -0.013876316631307, True, 0, Nothing, 0)
    boolstatus = Part.Extension.SelectByRay(4.72949686339916E-02, 1.33307046879168E-02, 2.07707102561017E-04, -0.499999999999997, -0.707106781186554, -0.499999999999995, 4.23592175091009E-04, 1, True, 0, 0)
    Part.ClearSelection2 True
   
    boolstatus = Part.Extension.SelectByID2("Sketch6", "SKETCH", 2.54585357375204E-02, -3.78791126417555E-03, -0.013876316631307, True, 0, Nothing, 0)
    Set swProfileSketch = Part.SelectionManager.GetSelectedObject6(1, -1)
    Part.ClearSelection2 True
   
    Dim swPathObj As Object
    Dim pathObjsArray(0) As Object
    boolstatus = Part.Extension.SelectByRay(4.72949686339916E-02, 1.33307046879168E-02, 2.07707102561017E-04, -0.499999999999997, -0.707106781186554, -0.499999999999995, 4.23592175091009E-04, 1, True, 0, 0)
    Set swPathObj = Part.SelectionManager.GetSelectedObject6(1, -1)
    Set pathObjsArray(0) = swPathObj
    Dim pathObjsVar As Variant
    pathObjsVar = pathObjsArray
    Part.ClearSelection2 True
  

Part.SetMaterialPropertyName2 "По умолчанию", "C:/ProgramData/SolidWorks/SOLIDWORKS 2021/Настроенный пользователем материал/Настроенный пользователем материал.sldmat", "Простая углеродистая сталь (Кор.)"
  
  

    Set swFeatMgr = Part.FeatureManager
  
    Set swFeatData = swFeatMgr.CreateDefinition(swFeatureNameID_e.swFmSweptFlange)
    swFeatData.EndOffset = 0
    swFeatData.FlangePosition = swSweptFlangePositionType_MaterialInside
    swFeatData.FlattenAlongPath = False
    swFeatData.OverrideDefaultSheetMetalParameters = False
    swFeatData.Path = pathObjsVar
    swFeatData.Profile = swProfileSketch
    swFeatData.ReverseDirection = False
    swFeatData.StartOffset = 0
    swFeatData.TrimSideBends = False
    swFeatData.UseDefaultBendAllowance = True
    swFeatData.UseDefaultBendRelief = True
    swFeatData.UseDefaultRadius = False
    swFeatData.UseGaugeTable = False
    swFeatData.UseMaterialSheetMetalParameters = True
    Set swFeat = swFeatMgr.CreateFeature(swFeatData)
    Part.ClearSelection2 True
    End Sub

так много кода и так мало комментариев(((((

предлагаю вам не сваливать все в одну кучу , а разбить на несколько этапов:

1. создание детали из шаблона

2. управление параметрами этой детали

3. готово.

 

Либо чтобы не тратить зря время- просто забейте в шаблоне детали все необходимые параметры и будет вам счастье.

Ссылка на сообщение
Поделиться на других сайтах

Попробовал немного по другому. Сначала сделал выбор материала, а затем чтобы поставилась галочка "Использовать параметры материала для листового металла" с выбором таблицы сгибов (подвязана в настройках материала). Увы из всего этого происходит только выбор материала...

В принципе, временно подошел бы вариант, в котором можно просто подгрузить таблицу сгибов, но это также не работает (только при создании новой детали, а не для изменения параметров текущей модели).

 

Dim swApp As Object
Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long

Sub main()

Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc

'Выбор материала
Part.SetMaterialPropertyName2 "По умолчанию", "C:/ProgramData/SolidWorks/SOLIDWORKS 2021/Настроенный пользователем материал/Настроенный пользователем материал.sldmat", "Простая углеродистая сталь (Кор.)"

'Ставим галочку "Использовать параметры материала для листового металла"
Part.ClearSelection2 True
boolstatus = Part.Extension.SetUserPreferenceToggle(swUserPreferenceToggle_e.swSketchAddConstToRectEntity, swUserPreferenceOption_e.swDetailingNoOptionSpecified, True)
boolstatus = Part.Extension.SetUserPreferenceToggle(swUserPreferenceToggle_e.swSketchAddConstLineDiagonalType, swUserPreferenceOption_e.swDetailingNoOptionSpecified, True)

'Информация о таблице сгибов
Dim customBendAllowanceData As Object
Set customBendAllowanceData = Part.FeatureManager.CreateCustomBendAllowance()
customBendAllowanceData.BendTableFile = "C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\lang\russian\Sheetmetal Bend Tables\BD_Table_бф.xlsx"
Dim myFeature As Object
Set myFeature = Part.FeatureManager.InsertSheetMetalBaseFlange2(0.001, False, 0.001, 0.02, 0.01, False, 0, 0, 1, customBendAllowanceData, True, 0, 0.0001, 0.0001, 0.5, True, False, True, True)
End Sub
 

Ссылка на сообщение
Поделиться на других сайтах
6 часов назад, Sergej0895 сказал:

Попробовал немного по другому. Сначала сделал выбор материала, а затем чтобы поставилась галочка "Использовать параметры материала для листового металла" с выбором таблицы сгибов (подвязана в настройках материала). Увы из всего этого происходит только выбор материала...

В принципе, временно подошел бы вариант, в котором можно просто подгрузить таблицу сгибов, но это также не работает (только при создании новой детали, а не для изменения параметров текущей модели).

 

Dim swApp As Object
Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long

Sub main()

Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc

'Выбор материала
Part.SetMaterialPropertyName2 "По умолчанию", "C:/ProgramData/SolidWorks/SOLIDWORKS 2021/Настроенный пользователем материал/Настроенный пользователем материал.sldmat", "Простая углеродистая сталь (Кор.)"

'Ставим галочку "Использовать параметры материала для листового металла"
Part.ClearSelection2 True
boolstatus = Part.Extension.SetUserPreferenceToggle(swUserPreferenceToggle_e.swSketchAddConstToRectEntity, swUserPreferenceOption_e.swDetailingNoOptionSpecified, True)
boolstatus = Part.Extension.SetUserPreferenceToggle(swUserPreferenceToggle_e.swSketchAddConstLineDiagonalType, swUserPreferenceOption_e.swDetailingNoOptionSpecified, True)

'Информация о таблице сгибов
Dim customBendAllowanceData As Object
Set customBendAllowanceData = Part.FeatureManager.CreateCustomBendAllowance()
customBendAllowanceData.BendTableFile = "C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\lang\russian\Sheetmetal Bend Tables\BD_Table_бф.xlsx"
Dim myFeature As Object
Set myFeature = Part.FeatureManager.InsertSheetMetalBaseFlange2(0.001, False, 0.001, 0.02, 0.01, False, 0, 0, 1, customBendAllowanceData, True, 0, 0.0001, 0.0001, 0.5, True, False, True, True)
End Sub
 

Здравствуйте. Можно вопрос? 

Вы этот код :

написали сами, 

взяли из справки, 

записали рекордером и немного отформатировали? 

Ссылка на сообщение
Поделиться на других сайтах
1 минуту назад, Sturmann сказал:

записали рекордером ...

Судя по первым двум строкам кода - то да

Ссылка на сообщение
Поделиться на других сайтах
1 минуту назад, Snake 60 сказал:

Судя по первым двум строкам кода - то да

Ну вот верят люди что открыв один документ в случайном виде и сделав с ним какие либо действия и щаписав их рекордером солид будет повторять эти действия на всех сборках! 

Не будет такого. 

Тут нужно разбирать каждую строку- что делает почему именно так. И проверять на сотнях документов с разных компов и от разных авторов. 

Ссылка на сообщение
Поделиться на других сайтах
11 часов назад, Sturmann сказал:

Здравствуйте. Можно вопрос? 

Вы этот код :

написали сами, 

взяли из справки, 

записали рекордером и немного отформатировали? 

Данный код да, отформатированный после записи. Пробовал уже по разному и вручную и с записью и объединял оба кода, но так как уровня знаний не хватает в данной области - мог попросту упустить какую-нибудь мелочь.

Ссылка на сообщение
Поделиться на других сайтах
2 часа назад, Sergej0895 сказал:

Данный код да, отформатированный после записи. Пробовал уже по разному и вручную и с записью и объединял оба кода, но так как уровня знаний не хватает в данной области - мог попросту упустить какую-нибудь мелочь.

Ну так это не работает.

Он много чего не записывает или записывает "здесь и сейчас" только для данных событий.

Для другой сборки он может и не сработать.

Тут нужны знания по программированию

Ссылка на сообщение
Поделиться на других сайтах
22.01.2022 в 19:02, Sergej0895 сказал:

Смысл вообще в том, чтобы при запуске просто прожималась галочка "Использовать параметры материала для листового металла"

Вот эту галку надо активировать?

изображение.png

Ссылка на сообщение
Поделиться на других сайтах

%E2%80%AAC%3A%5CUsers%5CANONIM%5CDesktop%5C1.jpgPlLz4Не совсем, нужная галочка находится чуть выше. Она так и называется "Использовать параметры материала для листового металла".

Ссылка на сообщение
Поделиться на других сайтах

Присоединяйтесь к обсуждению

Вы можете опубликовать сообщение сейчас, а зарегистрироваться позже. Если у вас есть аккаунт, войдите в него для написания от своего имени.
Примечание: вашему сообщению потребуется утверждение модератора, прежде чем оно станет доступным.

Гость
Ответить в тему...

×   Вставлено в виде отформатированного текста.   Вставить в виде обычного текста

  Разрешено не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отобразить как ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставить изображения напрямую. Загрузите или вставьте изображения по ссылке.

  • Сейчас на странице   0 пользователей

    Нет пользователей, просматривающих эту страницу.




  • Сообщения

    • Akabanks87
      Добрый вечер всем специалистам. Подскажите пожалуйста, можно ли в SW Simulation при расчете металлоконструкций в виде балок, прописать жесткость вращения в узлах по осям? Что-то наподобие как в штырьковом соединителе (твердотельный расчет) - там мы можем указывать только простой шарнир в одной плоскости и прописывать жесткость вращения Н*м/рад.  Вот нужно что-то похожее только для балок и жесткость вращения указать по двум осям Мx и My. Надеюсь смог объяснить правильно, заранее спасибо   Картинка прилагается  
    • статист
      Добрый день! Возник вопрос как повернуть сечение балочного элемента. Допустим, есть балочный элемент, который создан не на линии, а напрямую через элемент.   ET,1,BEAM188 MPTEMP,,,,,,,,   MPTEMP,1,0   MPDATA,EX,1,,2e11    MPDATA,PRXY,1,,0.3   SECTYPE,   1, BEAM, RECT, quad, 0    SECOFFSET, CENT SECDATA,0.1,0.1,0,0,0,0,0,0,0,0,0,0 N,1,0,0,0    N,2,1,0,0    E,1,2        Как его сечение можно повернуть, например, на 45 градусов?  
    • ak762
      если вас беспокоят результаты анализа которые кратны ожилаемым, а картинка по распределению напряжений отражает ожидаемое, то возможно у вас деталь имеет не те размеры? для пороверки построил деталь с заданными размерами   в сборке завел вашу и на картинке она кратна той что я построил      
    • gudstartup
      вот эти как бы ничего
    • Orchestra2603
      Я так и не понял, так в чем проблема то была? За что @Jesse то получил ? :D Ну, допустим нужна факторизация. Ну, так, сделаем факторизацию. В чем сложность в итоге? Или вы хотите скахать, что в ИСПЕ какая-то специальная крутая система обхода факторизации?   Кроме того, разве матрица масс стержневого элемента не так выглядит?     Почему у вас нет внедиагональных элементов?
    • cepr
      Есть рабочий компьютер, есть от чего отталкиваться. Понятно, что связка Intel-Nvidia. Экран 17", обратить внимание на матрицу. Ну, и сумма, какую можете потратить на ноут.
    • gudstartup
      а вот тут все уже расписано   это оказалось непросто оказывается китайцы в этих вопросах большие параноики и сами себе не доверяют
    • MagicNight
      Да дело не в бедности, ищу оптимальный ноут, пока не могу найти.
    • Bot
      АСКОН объявляет о старте открытого бета-тестирования новой версии КОМПАС-3D и приложений. Коммерческая версия КОМПАС-3D v23 выйдет летом 2024 года, но уже сейчас испытать новинки может любой желающий. Бета-тестирование — это проверка новой функциональности в «полевых» условиях, когда пользователи знакомятся с нововведениями на собственных проектах и сценариях работы, а также проверяют совместимость со своим программно-аппаратным обеспечением. Новая версия создавалась в соответствии с дорожной картой АСКОН для задач проектирования изделий высокотехнологичных отраслей и стала еще более функциональной и производительной. При разработке учитывались предложения пользователей по темам трехмерного моделирования, подготовки чертежей и спецификаций, приложений для машиностроения, приборостроения и строительства. Бета-версия КОМПАС-3D открыта для всех. Дистрибутив предоставляется бесплатно на время проведения тестирования. *** Период проведения бета-тестирования: с 6 [...] View the full article
    • fenics555
      Уважаемые Дамы и Господа!  Есть библиотечные изделия, которые почему-то очень доооооолго грузятся в сборках. Я хочу попросить Вас потестить их и сказать в чем причина, ибо совсем невозможно работать. gost18829-73.prt.1 pin_split.prt.1 Как это всё можно ускорить?
×
×
  • Создать...