Jump to content


0SM-FLAT-PATTERN rename defaut


Interteris

Recommended Posts

Interteris

квк изменить дефаултное название 0SM-FLAT-PATTERN в настойках. Задалбало постоянно возвращятся в конфигурацию детали и в ручную и изменять названия. 

dolzno.jpg

Est.jpg

Link to post
Share on other sites


UnPinned posts
Kelny
5 часов назад, Interteris сказал:

квк изменить дефаултное название 0SM-FLAT-PATTERN в настойках. Задалбало постоянно возвращятся в конфигурацию детали и в ручную и изменять названия. 

Можно создать(добавить) конфигурацию развёртки ещё в модели с нужным именем и для этой конфигурации высветить элемент РАЗВЁРТКА в дереве (или соответствующая кнопка инструмента РАЗВЁРТКА). В чертеже использовать созданную конфигурацию, а не автоматически создаваемую при использования инструментов чертежа - не использовать РАЗВЁРТКА из палитры видов, а вставить вид и выбрать конфигурацию отображения развёртки для вставленного вида.

 

Так же после создания конфигурации развёртки стоит забыть о существовании кнопки инструмента РАЗВЁРТКА и использовать для отображения развёртки исключительно созданную конфигурацию развёртки.

Edited by Kelny
Link to post
Share on other sites
Kelny
5 часов назад, Interteris сказал:

Задалбало постоянно возвращятся в конфигурацию детали и в ручную и изменять названия. 

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

Цитата

'------------------------------------------
'Условия:

'Исправить в макросе "ТУТ_ВАША_ДОБАВКА"
'Модель листового металла открыта и выбрана нужная конфигурация,
'открыт чертёж для выбраной модели и открыта панель видов,
'развёртка ещё не вставлена
'
'Результат:
'Будет добавлен плоский вид
'Конфигурация будет названа иначе
'-------------------------------------------

Option Explicit


Sub main()
    Dim swApp                   As SldWorks.SldWorks
    Dim swModel                 As SldWorks.ModelDoc2
    Dim swDraw                  As SldWorks.DrawingDoc
    Dim swView                  As SldWorks.View
    Dim bRet                    As Boolean
    Dim ActiveConfig            As String
    Dim thisConfig As Configuration
    Dim swNewView As View
    Dim vPaletteNames As Variant


    Set swApp = CreateObject("SldWorks.Application")

    Set swDraw = swApp.ActiveDoc
    
    vPaletteNames = swDraw.GetDrawingPaletteViewNames() 'Все варианты имён в палитре видов
 

'Вставка на чертёж из платиры видов вида Развертка  в координаты (значения в метрах)
    Set swNewView = swDraw.DropDrawingViewFromPalette2("Развертка", 0.1, 0.1, 0.1)

Debug.Print "New drawing view name: " & swNewView.Name

 

'Модель по которой создана вид в чертеже для переименования

Set swModel = swNewView.ReferencedDocument
        Set thisConfig = swModel.GetActiveConfiguration
    ActiveConfig = thisConfig.Name
 

'Находим конфигурацию развёртки в модели  

     Set thisConfig = swModel.GetConfigurationByName(ActiveConfig & "SM-FLAT-PATTERN")
     Debug.Print "Name по умолчанию:    ", thisConfig.Name
     

'Переименовываем на новое имя конфигрурации
     thisConfig.Name = ActiveConfig & "ТУТ_ВАША_ДОБАВКА" 
     Debug.Print "Name новое:    ", thisConfig.Name
     
     Debug.Print swNewView.GetName2
     Debug.Print swNewView.FlipView

 

     'swNewView.FlipView = False 'тут можно перевернуть вид
     'Debug.Print swNewView.FlipView
    
End Sub

 

Edited by Kelny
  • Нравится 1
Link to post
Share on other sites

1. создать шаблон детали. обозвать "деталь листовая". 

2. создать в ней листовую деталь. создать автоматом развертку.

3. переименовать созданную конфигурацию как душе удобно.

4. очистить дерево построения - удалить операции в дереве. (можно оставить основу, по желанию)

5. сохранить шаблон.

 

далее использовать его для создания листовых деталей.

 

p.s. фишка только для детали c одной конфигурацией. при создании новых для них будет создаваться старое имя

Edited by clavr
Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    No registered users viewing this page.

  • Сообщения

    • maxx2000
      за это к сожалению не заплатят.
    • green_fly
      Можно попробовать посчитать плотность. Или даже просто опустить в воду - капролон тяжелее, а полиэтилен - легче.
    • Viktor2004
      Как все предсказуемо.
    • maxx2000
      Ага, даже на фото видно белый и прозрачный. Очень похож на полиэтилен высокого давления. Было у нас одно изделие, кабель РК75, центральная жила 4мм в изоляции из полиэтилена диаметром около 20 мм. Вот из этой изоляции точили ручки на отвёртки. Вот по внешнему виду один в один по качеству поверхности.
    • Fedor
      https://ru.wikipedia.org/wiki/Графовая_база_данных   интересная тема для формирования матриц жесткости в мкэ. Интересно существуют ли алгоритмы на матрицах решающие и возможные уравнения представленные в виде графов ... 
    • davidovka
      кажется слишком белым для капролона
    • maxx2000
      Собственно вопрос в заголовке. Клиент наточил из своего материала заготовки и утверждает что это капролон. Я ему говорю что капролон не даёт такой волсни и по цвету совсем не капролон, что капролн молочного цвета и непрозрачный. Говорит , в магазине продали как "Капролон натуральный"  Для токарки может и пойдёт, но мне его фрезеровать в 3D  
    • BSV1
    • Maik812
      ждите...если буду делать редуктор покажу пока не нужно. а вы не понимаете что в пакете СВ моушен делается расчеты и кинематика а не в сборке сопряжением. смысл говорить о чем то не вижу.     https://rutube.ru/video/b7ef84852d6d02f203ae7dbee09fa356/?r=plemwd
    • clavr
      Не праздный вопрос, зачем? есть компас есть библиотека. пару минут и все готово. нужна модель - конвертнул из компаса в солид. Мне просто интересно зачем все это реализовать в Солиде? ради чего, какие преимущества дает это?
×
×
  • Create New...