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

Свойства листового металла в базе материалов


VOleg

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

Всем добрый день.

В базе материалов появилась вкладка "Листовой металл", но в справках не могу найти описания ее действия. В базе материалов соответствующие записи появляются, но больше ничего не происходит. А хотелось бы при назначении листового материала автоматом заполнять толщину, радиус гиба и допуск сгиба в моделе.

Может кто знает?

изображение_2022-09-20_212358544.png

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


UnPinned posts
12 часов назад, VOleg сказал:

А хотелось бы при назначении листового материала автоматом заполнять толщину, радиус гиба и допуск сгиба в моделе.

https://help.solidworks.com/2019/russian/whatsnew/t_linking_materials_and_sheet_metal_parameters.htm

https://help.solidworks.com/2022/russian/solidworks/sldworks/t_material_db_sheet_metal_tab.htm

 

 

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

Спасибо за подсказку.

А где мне ввести толщину и радиус гиба?

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

Спасибо за подсказку.

А где мне ввести толщину и радиус гиба?

Если у вас получится и если не трудно поделитесь деталью/материалом)))

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

Если у вас получится и если не трудно поделитесь деталью/материалом)))

Мне не трудно.

Пока я смог для каждого материала заполнить таблицу Коэфф.К и она загружается в каждый материал. Но от этого не легче. Она просто констатирует, что при какой толщине какой Коэфф.К. И что?

Ранее я пытался связать свойства материла с модель. Заполнял пользовательское свойство "Толщина" и макросом переносил ее в модель. Но это надо не забывать нажать эту кнопочку. Тяжело.

Sub getkodmat()

 Dim swApp           As SldWorks.SldWorks
 Dim swModel         As SldWorks.ModelDoc2
 Dim swPart          As SldWorks.PartDoc
 Dim dbs             As Variant
 Dim sMatName        As String
 Dim uMatName        As String
 Dim sMatDB          As String
 Dim name1           As String, name2 As String, valu1 As String, valu2 As String
 Dim bRet            As Boolean
 Dim i               As Integer
 Dim swConfigMgr     As SldWorks.ConfigurationManager
 Dim swConfig        As SldWorks.Configuration
 Dim swCustPropMgr   As SldWorks.CustomPropertyManager
 Dim cname           As String, isto As String

' Dim xd As MSXML2.DOMDocument
' Dim ndl As MSXML2.IXMLDOMNodeList
' Dim nd As MSXML2.IXMLDOMNode
' Dim ndcs As MSXML2.IXMLDOMNodeList
' Dim ndс As MSXML2.IXMLDOMNode
' Dim at As MSXML2.IXMLDOMAttribute

 Set swApp = Application.SldWorks
 Set swModel = swApp.ActiveDoc
 
  ' Начальные проверки
 If swModel Is Nothing Then
     MsgBox "Ничего не открыто", , "Откройте сборку"
     Exit Sub
 End If
 If swModel.GetType <> swDocPART Then
     MsgBox "Текущий документ д.б. деталью!", , "Откройте деталь"
     Exit Sub
 End If
 
 
 Set swPart = swModel
 Set swConfigMgr = swModel.ConfigurationManager
 Set swConfig = swConfigMgr.ActiveConfiguration
 Set swCustPropMgr = swConfig.CustomPropertyManager

 cname = swConfig.Name
 sMatDB = ""
 name1 = "Код материала"
 name2 = "РазмерСортамента"
 dbs = swApp.GetMaterialDatabases
 sMatName = swPart.GetMaterialPropertyName2(cname, sMatDB)
 If sMatName = "" Then
    MsgBox "Для конфигурации " + Chr(34) + cname + Chr(34) + " не задан материал"
    Exit Sub
 End If

 fnd1 = False
 For i = LBound(dbs) To UBound(dbs)
   If StrComp(UCase(Left(Right(dbs(i), Len(sMatDB) + 7), Len(sMatDB))), UCase(sMatDB)) = 0 Then
     sMatDB = dbs(i)
     fnd1 = True
     Exit For
   End If
 Next i

 If Not fnd1 Then
   MsgBox "Наща БД материалов не найдена", , sMatDB
   Exit Sub
 End If
 Set xd = CreateObject("MSXML2.DOMDocument")
 xd.Load (sMatDB)
 uMatName = UCase(sMatName)

 Set ndl = xd.getElementsByTagName("material")
 For i = 0 To ndl.Length - 1
   fnd1 = False
   Set nd = ndl.Item(i)
   nat = nd.Attributes.Length
   For j = 0 To nat - 1
     Set at = nd.Attributes.Item(j)
     If UCase(at.Name) = "NAME" And UCase(at.Value) = UCase(uMatName) Then
       fnd1 = True
       Exit For
     End If
   Next
   If fnd1 Then Exit For
 Next
 
 If fnd1 Then  ' nd - наш материал
    fnd2 = False
    fnd3 = False
    fnd4 = False
    fnd5 = False
    fnd6 = False
    fnd7 = False
    For j = 0 To nat - 1
      Set at = nd.Attributes.Item(j)
      If UCase(at.Name) = "PROPERTYSOURCE" Then
        fnd2 = True
        isto = at.Value
        If fnd2 Then Exit For
      End If
    Next
    
    Set ndcs = nd.childNodes
    For j = 0 To ndcs.Length - 1
      If UCase(ndcs.Item(j).nodeName) = "CUSTOM" Then
        fnd3 = True
        Exit For
      End If
    Next j
    
    If fnd3 Then
     Set ndcs = ndcs.Item(j).childNodes
     ' поиск первого свойства
     For i = 0 To ndcs.Length - 1
       Set nd = ndcs.Item(i)
       nat = nd.Attributes.Length
       For j = 0 To nat - 1
         Set at = nd.Attributes.Item(j)
         If UCase(at.Name) = "NAME" And UCase(at.Value) = UCase(name1) Then
           fnd4 = True
           Exit For
         End If
       Next
       If fnd4 Then
         For j = 0 To nat - 1
           Set at = nd.Attributes.Item(j)
           If UCase(at.Name) = "VALUE" Then
             fnd5 = True
             valu1 = at.Value
             Exit For
           End If
         Next
       End If
       If fnd5 Then Exit For
     Next
     ' поиск второго свойства
     For i = 0 To ndcs.Length - 1
       Set nd = ndcs.Item(i)
       nat = nd.Attributes.Length
       For j = 0 To nat - 1
         Set at = nd.Attributes.Item(j)
         If UCase(at.Name) = "NAME" And UCase(at.Value) = UCase(name2) Then
           fnd6 = True
           Exit For
         End If
       Next
       If fnd6 Then
         For j = 0 To nat - 1
           Set at = nd.Attributes.Item(j)
           If UCase(at.Name) = "VALUE" Then
             fnd7 = True
             valu2 = at.Value
             Exit For
           End If
         Next
       End If
       If fnd7 Then Exit For
     Next
    End If
    
 End If

 i = 0
 If Not fnd1 Then
   MsgBox "Материал " + Chr(34) + sMatName + Chr(34) + "не найден в БД", , sMatDB
 Else
   'If fnd2 Then
   '   MsgBox "Свойство Источник=" + isto, , sMatName
   'Else
   '   MsgBox "Атрибут PropertySource не найден для материала", , sMatName
   'End If
   If Not fnd3 Then
      MsgBox "Для материала не найдены свойства пользователя", , sMatName
   Else
     If fnd5 Then
      If swCustPropMgr.Set(name1, valu1) < 0 Then swCustPropMgr.Add2 name1, swCustomInfoText, valu1
      i = i + 1
     Else
      MsgBox "Для материала не найдено свойство " + name1, , sMatName
     End If
     If fnd7 Then
      If swCustPropMgr.Set(name2, valu2) < 0 Then swCustPropMgr.Add2 name2, swCustomInfoText, valu2
      i = i + 1
     Else
      MsgBox "Для материала не найдено свойство " + name2, , sMatName
     End If
   End If
 End If
 MsgBox "Добавлено/изменено свойств материала:" + Str(i)
 Set xd = Nothing
 
End Sub
 

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

Мне не трудно.

Пока я смог для каждого материала заполнить таблицу Коэфф.К и она загружается в каждый материал. Но от этого не легче. Она просто констатирует, что при какой толщине какой Коэфф.К. И что?

Ранее я пытался связать свойства материла с модель. Заполнял пользовательское свойство "Толщина" и макросом переносил ее в модель. Но это надо не забывать нажать эту кнопочку. Тяжело.

Sub getkodmat()

 Dim swApp           As SldWorks.SldWorks
 Dim swModel         As SldWorks.ModelDoc2
 Dim swPart          As SldWorks.PartDoc
 Dim dbs             As Variant
 Dim sMatName        As String
 Dim uMatName        As String
 Dim sMatDB          As String
 Dim name1           As String, name2 As String, valu1 As String, valu2 As String
 Dim bRet            As Boolean
 Dim i               As Integer
 Dim swConfigMgr     As SldWorks.ConfigurationManager
 Dim swConfig        As SldWorks.Configuration
 Dim swCustPropMgr   As SldWorks.CustomPropertyManager
 Dim cname           As String, isto As String

' Dim xd As MSXML2.DOMDocument
' Dim ndl As MSXML2.IXMLDOMNodeList
' Dim nd As MSXML2.IXMLDOMNode
' Dim ndcs As MSXML2.IXMLDOMNodeList
' Dim ndс As MSXML2.IXMLDOMNode
' Dim at As MSXML2.IXMLDOMAttribute

 Set swApp = Application.SldWorks
 Set swModel = swApp.ActiveDoc
 
  ' Начальные проверки
 If swModel Is Nothing Then
     MsgBox "Ничего не открыто", , "Откройте сборку"
     Exit Sub
 End If
 If swModel.GetType <> swDocPART Then
     MsgBox "Текущий документ д.б. деталью!", , "Откройте деталь"
     Exit Sub
 End If
 
 
 Set swPart = swModel
 Set swConfigMgr = swModel.ConfigurationManager
 Set swConfig = swConfigMgr.ActiveConfiguration
 Set swCustPropMgr = swConfig.CustomPropertyManager

 cname = swConfig.Name
 sMatDB = ""
 name1 = "Код материала"
 name2 = "РазмерСортамента"
 dbs = swApp.GetMaterialDatabases
 sMatName = swPart.GetMaterialPropertyName2(cname, sMatDB)
 If sMatName = "" Then
    MsgBox "Для конфигурации " + Chr(34) + cname + Chr(34) + " не задан материал"
    Exit Sub
 End If

 fnd1 = False
 For i = LBound(dbs) To UBound(dbs)
   If StrComp(UCase(Left(Right(dbs(i), Len(sMatDB) + 7), Len(sMatDB))), UCase(sMatDB)) = 0 Then
     sMatDB = dbs(i)
     fnd1 = True
     Exit For
   End If
 Next i

 If Not fnd1 Then
   MsgBox "Наща БД материалов не найдена", , sMatDB
   Exit Sub
 End If
 Set xd = CreateObject("MSXML2.DOMDocument")
 xd.Load (sMatDB)
 uMatName = UCase(sMatName)

 Set ndl = xd.getElementsByTagName("material")
 For i = 0 To ndl.Length - 1
   fnd1 = False
   Set nd = ndl.Item(i)
   nat = nd.Attributes.Length
   For j = 0 To nat - 1
     Set at = nd.Attributes.Item(j)
     If UCase(at.Name) = "NAME" And UCase(at.Value) = UCase(uMatName) Then
       fnd1 = True
       Exit For
     End If
   Next
   If fnd1 Then Exit For
 Next
 
 If fnd1 Then  ' nd - наш материал
    fnd2 = False
    fnd3 = False
    fnd4 = False
    fnd5 = False
    fnd6 = False
    fnd7 = False
    For j = 0 To nat - 1
      Set at = nd.Attributes.Item(j)
      If UCase(at.Name) = "PROPERTYSOURCE" Then
        fnd2 = True
        isto = at.Value
        If fnd2 Then Exit For
      End If
    Next
    
    Set ndcs = nd.childNodes
    For j = 0 To ndcs.Length - 1
      If UCase(ndcs.Item(j).nodeName) = "CUSTOM" Then
        fnd3 = True
        Exit For
      End If
    Next j
    
    If fnd3 Then
     Set ndcs = ndcs.Item(j).childNodes
     ' поиск первого свойства
     For i = 0 To ndcs.Length - 1
       Set nd = ndcs.Item(i)
       nat = nd.Attributes.Length
       For j = 0 To nat - 1
         Set at = nd.Attributes.Item(j)
         If UCase(at.Name) = "NAME" And UCase(at.Value) = UCase(name1) Then
           fnd4 = True
           Exit For
         End If
       Next
       If fnd4 Then
         For j = 0 To nat - 1
           Set at = nd.Attributes.Item(j)
           If UCase(at.Name) = "VALUE" Then
             fnd5 = True
             valu1 = at.Value
             Exit For
           End If
         Next
       End If
       If fnd5 Then Exit For
     Next
     ' поиск второго свойства
     For i = 0 To ndcs.Length - 1
       Set nd = ndcs.Item(i)
       nat = nd.Attributes.Length
       For j = 0 To nat - 1
         Set at = nd.Attributes.Item(j)
         If UCase(at.Name) = "NAME" And UCase(at.Value) = UCase(name2) Then
           fnd6 = True
           Exit For
         End If
       Next
       If fnd6 Then
         For j = 0 To nat - 1
           Set at = nd.Attributes.Item(j)
           If UCase(at.Name) = "VALUE" Then
             fnd7 = True
             valu2 = at.Value
             Exit For
           End If
         Next
       End If
       If fnd7 Then Exit For
     Next
    End If
    
 End If

 i = 0
 If Not fnd1 Then
   MsgBox "Материал " + Chr(34) + sMatName + Chr(34) + "не найден в БД", , sMatDB
 Else
   'If fnd2 Then
   '   MsgBox "Свойство Источник=" + isto, , sMatName
   'Else
   '   MsgBox "Атрибут PropertySource не найден для материала", , sMatName
   'End If
   If Not fnd3 Then
      MsgBox "Для материала не найдены свойства пользователя", , sMatName
   Else
     If fnd5 Then
      If swCustPropMgr.Set(name1, valu1) < 0 Then swCustPropMgr.Add2 name1, swCustomInfoText, valu1
      i = i + 1
     Else
      MsgBox "Для материала не найдено свойство " + name1, , sMatName
     End If
     If fnd7 Then
      If swCustPropMgr.Set(name2, valu2) < 0 Then swCustPropMgr.Add2 name2, swCustomInfoText, valu2
      i = i + 1
     Else
      MsgBox "Для материала не найдено свойство " + name2, , sMatName
     End If
   End If
 End If
 MsgBox "Добавлено/изменено свойств материала:" + Str(i)
 Set xd = Nothing
 
End Sub
 

Это как то все усложнено (как мне кажется).

Я сейчас использую такого типа записи

Труба
Труба "A@э"x"B@э"x"1@э" ГОСТ 8645-68
                    В10 ГОСТ 13663-86
L="D1@Бобышка-Вытянуть1" мм, Торцы Rz320

-------Труба квадратная----------------------
Труба
Труба "A@э"x"A@э"x"R@э" ГОСТ 8639-82
                 В10 ГОСТ 13663-86
L="D1@Бобышка-Вытянуть1"мм, Торцы Rz320
это всё тоже неудобно, но работает.

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

Это как то все усложнено (как мне кажется).

Я сейчас использую такого типа записи

Труба

Мы говорим о листовом металле. Вопрос как из материала перенести в модель толщину, радиус гиба и Коэфф.К.

изображение_2022-09-21_120611983.png

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

Мы говорим о листовом металле. Вопрос как из материала перенести в модель толщину, радиус гиба и Коэфф.К.

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

Другие параметры похоже пока оставили без внимания и требуется их ручной ввод в модели.

 

46 минут назад, VOleg сказал:

Ранее я пытался связать свойства материла с модель. Заполнял пользовательское свойство "Толщина" и макросом переносил ее в модель. Но это надо не забывать нажать эту кнопочку. Тяжело.

Можно попробовать встроить макрос в модель и что бы он, например, реагировал на смену материала (надо посмотреть отслеживает ли он это событие через API).

В качестве примера есть макрос создающий себя в модели фичерсом и пересчитывающий центр масс при изменении модели:

 

CenterOfGravity.zip

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

Если у вас получится и если не трудно поделитесь деталью/материалом)))

Вот такая табличка у меня получилась. Для разных станков коэффициент К может быть другим.

В базе материалов жму кнопку импорт и табличка переписывается.

КоэффициентКлистовогоМеталла.xls

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

Для разных станков коэффициент К может быть другим.

Именно поэтому развёртка должна быть справочной, а коэффициент должен быть вписан в ТТ как коэффициент по которому вычислена развёртка, что бы на производстве технолог проверил коэффициент и в случае необходимости скорректировал справочную развёртку под свои станки.

 

Можно глянуть таблички и коэффициенты в РТМ 34-65 Штампы для холодной листовой штамповки - имеется на просторах итернета.

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

Именно поэтому развёртка должна быть справочной

Бог с ней, с разверткой. Мне нужно задать толщину, радиус гиба, и коэфф.К в материале, например в виде пользовательских свойств и макросом перенести их в свойства листового металла в случае задания или изменения материала. Я тут проверил, мой макрос. почему-то, не работает...

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

А хотелось бы при назначении листового материала автоматом заполнять толщину, радиус гиба и допуск сгиба в моделе.

Может кто знает?

Почитал ветку с непониманием что происходит. Расскажу вкратце как устроен листогиб, разновидности и способы гиба листа, может тогда многие вопросы отпадут сами собой

Есть два основных типа листогибов - вертикальный, с пуансоном, входящим в призму на столе и горизонтальный, когда гиб осуществляется поднятием с поворотом ножа на нужный угол.

В первом типе внутренний радиус гиба листа определяется радиусом кромки пуансона, который никто не будет менять в зависимости от толщины листа, разве что если нужно гнуть лист 8 после тройки. От 0,5 до 3 мм, а иногда и до 4 мм пуансоны не меняют, а толще обычно не тянет сама машина, этому на заводах, где гнут и тонкие и толстые листы, листогибов больше, чем один. Во втором - расстоянием края прижима от оси поворота ножа, которое не изменяется и так же листы от 0,5 до 3 мм гнут на одной машине, толще - на другой Это принципиально разные машины. Как видим зависимости от толщины металла тут нет, есть только максимальная толщина, которую способен согнуть конкретный листогиб.

Только в гибочных штампах, когда штамп делается под конкретную делать с конкретной толщиной заготовки радиус можно задать, в остальных случаях радиус гиба не зависит от толщины металла и выбирать этот параметр следует исходя из характеристик оборудования, на котором все это будет делаться

Я это всё к чему - если конструктор не проектирует штампы, а только детали из листового металла для листогиба, то ему нет смысла вообще знать эти коэффициенты, ему важнее знать параметры станка.

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

Почитал ветку с непониманием что происходит. Расскажу вкратце как устроен листогиб,

Спасибо. Первый раз я работал на ручном листогибе в институтских мастерских (делал себе блок питания) где-то в 1975-76. Затем уже на заводе на гидравлическом. Последний раз в 2005-2006 уже главным технологом учил рабочих нового участка работе на ЧПУ гибочном прессе.

Бог с ней, с технологией и гибкой.

Вопрос в другом - как пользовательские свойства материла в СолидВокрс перенести в модель и записать их в свойства листового металла - чтобы толщина соответствовала, радиус гиба и Коэффициент К (не путать с планетой К) тоже. Т.е. назначил или изменил материал - нажал на кнопку и модель перестроилась.

Вот так выглядит материал в базе

        <material name="Лист 5 ГОСТ 19903-2015 Ст3сп-5 ГОСТ 14637-89" description="" propertysource="" appdata="">
            <swatchcolor RGB="CCFF66">
                <sldcolorswatch:Optical Ambient="0.520000" Transparency="0.000000" Diffuse="0.800000" Specularity="1.000000" Shininess="0.400000" Emission="0.000000"/>
            </swatchcolor>
            <xhatch name="ISO (Сталь)" angle="0.000000" scale="1.000000"/>
            <sheetmetalOption selectionType="Таблица размеров" gaugeTablePath="C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\lang\russian\sheet metal gauge tables" gaugeTableName="C:\PROGRAM FILES\SOLIDWORKS CORP\SOLIDWORKS\LANG\RUSSIAN\SHEET METAL GAUGE TABLES\BEND ALLOWANCE INCHES SAMPLE.XLS" bendTablePath="C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\lang\russian\Sheetmetal Bend Tables" bendTableName="" bendCalculationTablePath="C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\lang\russian\Sheetmetal Bend Tables" bendCalculationTableName=""/>
            <sheetmetalThicknessRange>
                <prop fromThicknessOp="1" fromThicknessVal="0.000000" toThicknessOp="1" toThicknessVal="1.000000" unit="3" method="0" value="0.100000"/>
                <prop fromThicknessOp="1" fromThicknessVal="1.000000" toThicknessOp="1" toThicknessVal="1.500000" unit="3" method="0" value="0.142000"/>
                <prop fromThicknessOp="1" fromThicknessVal="1.500000" toThicknessOp="1" toThicknessVal="2.000000" unit="3" method="0" value="0.280000"/>
                <prop fromThicknessOp="1" fromThicknessVal="2.000000" toThicknessOp="1" toThicknessVal="3.000000" unit="3" method="0" value="0.280000"/>
                <prop fromThicknessOp="1" fromThicknessVal="3.000000" toThicknessOp="1" toThicknessVal="4.000000" unit="3" method="0" value="0.300000"/>
                <prop fromThicknessOp="1" fromThicknessVal="4.000000" toThicknessOp="1" toThicknessVal="5.000000" unit="3" method="0" value="0.300000"/>
                <prop fromThicknessOp="1" fromThicknessVal="5.000000" toThicknessOp="1" toThicknessVal="6.000000" unit="3" method="0" value="0.260000"/>
                <prop fromThicknessOp="1" fromThicknessVal="6.000000" toThicknessOp="1" toThicknessVal="8.000000" unit="3" method="0" value="0.260000"/>
                <prop fromThicknessOp="1" fromThicknessVal="8.000000" toThicknessOp="1" toThicknessVal="10.000000" unit="3" method="0" value="0.260000"/>
            </sheetmetalThicknessRange>
            <physicalproperties>
                <EX displayname="Модуль упругости" value="1.94E+11" usepropertycurve="0"/>
                <NUXY displayname="Коэффициент Пуассона" value="0.29" usepropertycurve="0"/>
                <GXY displayname="Модуль сдвига" value="7.900000256E+10" usepropertycurve="0"/>
                <ALPX displayname="Коэффициент теплового расширения" value="1.16e-05" usepropertycurve="0"/>
                <DENS displayname="Массовая плотность" value="7850" usepropertycurve="0"/>
                <KX displayname="Теплопроводность" value="88" usepropertycurve="0"/>
                <C displayname="Удельная теплоемкость" value="461" usepropertycurve="0"/>
                <SIGXT displayname="Предел прочности при растяжении" value="380000000" usepropertycurve="0"/>
                <SIGYLD displayname="Предел текучести" value="255000000" usepropertycurve="0"/>
            </physicalproperties>
            <sustainability linkId="" dbName=""/>
            <custom>
                <prop name="Толщина" description="" value="5" units="миллиметры"/>
                <prop name="Радиус гиба" description="" value="5" units="миллиметры"/>
                <prop name="Коэффициент К" description="" value="0.26" units=""/>
            </custom>
        </material>
 

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

Т.е. назначил или изменил материал - нажал на кнопку и модель перестроилась.

Изменил толщину металла - модель перестроилась. А радиусы возможного гиба станка не изменились, в результате сидишь и вручную меняешь каждый радиус. Наверно оно того стоит)

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

Изменил толщину металла - модель перестроилась. А радиусы возможного гиба станка не изменились, в результате сидишь и вручную меняешь каждый радиус. Наверно оно того стоит)

Все радиусы, толщины и пр. внесены в материал в базе материалов. Ничего вручную менять не нужно. Вы можете ответить на МОЙ вопрос? Я пишу медленно, чтобы было понятнее.

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

Вы можете ответить на МОЙ вопрос?

Судя по скрину надо кликать в PropertyManager (в самом верху прямо под зелёной галочкой и красным крестиком нераскрытая часть настроек):

ПАРАМЕТРЫ ЛИСТОВОГО МЕТАЛЛА ИЗ МАТЕРИАЛА [v]

https://help.solidworks.com/2019/russian/solidworks/sldworks/r_base_flange_propertymanager.htm

 

 

 

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

Все радиусы, толщины и пр. внесены в материал в базе материалов. Ничего вручную менять не нужно. Вы можете ответить на МОЙ вопрос? Я пишу медленно, чтобы было понятнее.

Вы в базу материалов внесете радиус пуансона гибочного станка на заводе, куда отправится Ваш чертеж? Может есть смысл писать еще медленнее, чтобы было понятно о чем Вам пытается сказать человек, работавший на подобных станках на разных заводах много лет?

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

удя по скрину надо кликать в PropertyManager (в самом верху прямо под зелёной галочкой и красным крестиком нераскрытая часть настроек):

Почему их нет в свойстве детали? Или как привязать эти свойства к детали без кликанья для каждой. Пакетно нужно.

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

Судя по скрину надо кликать в PropertyManager (в самом верху прямо под зелёной галочкой и красным крестиком нераскрытая часть настроек):

ПАРАМЕТРЫ ЛИСТОВОГО МЕТАЛЛА ИЗ МАТЕРИАЛА [v]

https://help.solidworks.com/2019/russian/solidworks/sldworks/r_base_flange_propertymanager.htm

 

 

 

Я пытаюсь нажать, но пишет что "к телу не применен материал". Попробовал и материал Солида и дрпугие - результат один.

2 часа назад, Sykes сказал:

Вы в базу материалов внесете радиус пуансона гибочного станка на заводе, куда отправится Ваш чертеж? 

Да, конечно. В этом и смысл - все назначить в базе материалов, а при назначении материала все перенесется в модель.

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

Судя по скрину надо кликать в PropertyManager (в самом верху прямо под зелёной галочкой и красным крестиком нераскрытая часть настроек):

ПАРАМЕТРЫ ЛИСТОВОГО МЕТАЛЛА ИЗ МАТЕРИАЛА [v]

https://help.solidworks.com/2019/russian/solidworks/sldworks/r_base_flange_propertymanager.htm

 

 

 

Получилось назначить материал телу.

Теперь у тела материал и у детали материал. Одни и те же или разные? Буду тыркать дальше.

изображение_2022-09-21_220423377.png

назначил телу один материал, а детали другой. 

изображение_2022-09-21_220923846.png

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

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

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

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

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

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

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

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

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

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

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



  • Сообщения

    • Snake 60
      Скорее всего исправляли в конкретной сборке, для конкретных тел. Насколько я помню, надо в самом эскизе профиля заполнить свойство Description
    • Snake 60
      Делаете дырку в свае - вставляете в нее трубу и 2 человеко-силы крутят сваю ) Дёшево и сердито и не нужен никакой планетарный редуктор ))
    • gudstartup
      вы всегда ищите свой путь или будете делать то что вам советуют? с самого начала прежде чем приступать к экспериментам вам нужно было вынуть носитель и сделать образ. diskcopy делает копию гибкого диска на другой а вам надо сделать образ жесткого диска или карты памяти. делайте как советует @Viktor2004 иначе еще чего нибудь сломаете или вам станок не нужен и вы его приобрели для экспериментов ? вот а печатной машинке из прошлого нельзя а вот на синумерике можно - удивительные вещи в настоящем происходят!! на 100 % уверен что там не модуль а либо писимиси ай либо жд @mircomax81 хотите работать в дос почитайте помощь по командам 
    • PuKoLLleT
      Доброго дня всем. Поделитесь опытом,раньше такое не доводилось делать. На торце фланца нужно сделать  восемь отверстий ф17H7 на токарно-фрезерном станке с осью Y ,имеется ManualGuide.В моем понимании нужно просверлить,а затем торцевой фрезой расточить нужный диаметр.Получится такой фокус,или надо разверткой доводить нужный размер?  Стойка Fanuc 0i-Tf.
    • Snake 60
      Всё верно, я даже русификатор делал для него (ушло на это где-то около года). Хороший софт был, я всех знакомых на него подсадил в свое время :) У меня даже где-то образ на виртуалке лежит с SW2014+MechSoft, Жаль, что автодеск его поглотил, а не DS :( А по сути вопроса, проектировал двухступенчатый планетарный редуктор в свое время. Что было нужно: Справочник по планетаркам (автора не помню, если надо поищу), из софта MathCAD + GearTeq (софтина идет вместе с GearTrax, только рассчитывает и моделирует несколько зацеплений согласно выбранной схеме, в том числе планетарки) Ой и ошибаетесь. Звездочки - не равно зубчатые колеса в планетарке) Мы намучились с малой точностью изготовления на эл.эрозии, а Вы лазером ))) Был собран опытный образец редуктора с незакаленными деталями, чисто проверить геометрию, отладить сборку. Так потом начальство этот редуктор сказало испытать в бою, как я не противился)) Помер за пару дней интенсивных нагрузок ))) Материал, термообработка и точности изготовления решают )
    • Snake 60
      @Тихоход  Ещё один вариант - изучать программирование и писать свою программу/макрос. Вот пример конфигуратора двери: https://www.youtube.com/watch?v=wv4HryWQBSk
    • mircomax81
      Посредством Diskcopy можно сделать адекватную копию на флоппи диск?
    • Andrey_kzn
      Да, ведь советовали автору вытащить жёсткий диск и сделать образ. Неужели самому не интересно, как устроен этот старый промкомпьютер? Там может стоять как жёсткий диск, так и CF-карта, или же Disc-on-chip или Disc-on-module.  Как-то очень давно, на подобном промышленном оборудовании (большая печатная машина) я не смог перенести  ПО с родной CF - карты на другую, такого же размера но другой фирмы. Была также станочная оболочка под досом.  Образ я делал Нортон гостом, развернул его на другую CF-карту без проблем. Машина загрузилась нормально и работала ровно 2 дня, на неродной CF-карте,  потом зависла, и отказалась загружаться. Пришлось вызывать сервисника. От него мы узнали, что нельзя просто так взять и заменить карту  - носитель системного ПО, на другую. А полезли мы туда, так как руководство захотело печатать отчёты по работе машины. В станочном ПО такая функция была. Вот только принтер надо было купить у фирмы - производителя этой самой машины. В попытках заставить работать другой принтер мы редактировали файл  AUTOEXEС.BAT, на предмет загрузки драйвера принтера, ничего не получилось, зато перестали открываться некоторые страницы станочного ПО.  Образ у нас был давно снят, и мы развернули его на другую карту памяти. Родную карту я трогать не стал (как чувствовал, что нельзя ). Сервисник восстановил ПО с архивной дискеты на родную карту памяти, и всё заработало. Дискеты с архивами ПО шли вместе с документацией к машине.  Там были дискеты с Досом, станочной оболочкой, параметрами приводов, программой ПЛК. Он же и предупредил нас о предельно аккуратном обращении с родной картой памяти, и посоветовал немедленно сделать образы с архивных дискет, что мы сразу и проделали.. Вот такой сюрприз от машины эпохи Дос.
    • Борман
    • gudstartup
      а ведь все работало...
×
×
  • Создать...