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

Сделай свою работу в Solidworks эффективнее


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

8 минут назад, YaDen сказал:

но вирустотал ругается

Тогда не используйте :smile: логично же

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


@kkk

В ‎04‎.‎09‎.‎2017 в 11:32, kkk сказал:

макрос для создания чертежа детали прямо из сборки

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

http://my-files.ru/123v0b

В окне модели solidworks при выборе компонента в дереве конструирования и запуске макроса, открывает окно свойств выбранного компонента:

http://my-files.ru/8npqvg

Проверьте, как работают. Лично я впечатлён, спасибо за поднятый вопрос.

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

@Kir95

 

Хорошие макросы, спасибо. Единственно, макрос для создания чертежа какую-то ошибку в конце выдает, надо будет покопаться. А вообще, в идеале, мне нужно, чтобы при выделении компонента в дереве или окне сборки, появлялось окно выбора формата чертежа и далее по стандартной процедуре создания чертежа из детали.

 

Макрос со свойствами у меня использоваться вряд ли будет, т.к. пользуюсь вкладкой Свойства пользователя. Так же можно заполнять свойства деталей прямо из сборки, опять же там у меня забиты все нужные свойства и писать почти ничего не нужно, все выбирается из списков и присваивается одной кнопкой. Опять же - стандартный функционал Солида, что немаловажно.

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

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

Свойства я тоже через "Свойства пользователя" назначаю, но не все, а макросом удобно просматривать ещё и свойства документа и конфигураций.

 

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

заделитесь макросом по переименованию видов

типа такого?

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

Тут уже выкладывали - найти не могу. Shvg вроде делал.

А как же поиск?: по ключевому слову видов при поиске в данной теме много чего находит.

 

Обсуждения и варианты по теме:

http://cccp3d.ru/topic/6071-сделай-свою-работу-в-solidworks-эффективнее/?page=94#comment-703723

http://cccp3d.ru/topic/6071-сделай-свою-работу-в-solidworks-эффективнее/?page=79#comment-614089

http://cccp3d.ru/topic/6071-сделай-свою-работу-в-solidworks-эффективнее/?page=79#comment-614080

http://cccp3d.ru/topic/6071-сделай-свою-работу-в-solidworks-эффективнее/?page=69#comment-510077

 

 

 

В 19.11.2012 в 18:30, Shvg сказал:

Мои извинения. Тестил на SW2011SP5 и WinXPx64. Там никаких ошибок не выскакивало. На Win7, да, есть ошибка. Ниже выложен исправленный вариант.

Исправленный вариант макроса ReplaceLabelView и его аналог exe-шник LabelView с исходниками.

LabelView.rar

ReplaceLabelView.rar

 

http://cccp3d.ru/topic/6071-сделай-свою-работу-в-solidworks-эффективнее/?do=findComment&comment=510181

 

 

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

Shvg вроде делал

Значит, этот, скорее всего:

http://http://my-files.ru/8yndpr

удаляется ссылка, что-то нарыли в архиве. LabelView, тот же, на который @Kelny ссылку выложил.

Изменено пользователем Kir95
Ссылка на сообщение
Поделиться на других сайтах
В 03.09.2017 в 15:53, streamdown сказал:

Сортировка сопряжений. А точнее, правильное переименование.

http://www.streamdivision.com/сортировка-сопряжений/

Проверка на вирусы, показала Троян :( и прочую гниль...

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

Проверка на вирусы

Отвечу как и всем предыдущим: не качать и не запускать. Всё ж логично.

5 часов назад, Kir95 сказал:

LabelView

Это от Kelny? У Shvg название dll-ки вроде подлиньше было.

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

Это от Kelny? У Shvg название dll-ки вроде подлиньше было.

По ссылкам выше варианты от Shvg  и ещё одного товарища.

Ссылка на сообщение
Поделиться на других сайтах
В 30.08.2017 в 12:20, Michael_Mira сказал:

...

А по поводу конфигурации в имени - так иначе не будет, ибо может быть несколько конфигураций разверток.

 

; А можно сделать перед номером конфигурации не точку, а тире? Сам не смог...

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

Макрос для установки ширины дерева конструирования - значение в скобках (420) можно поменять на более подходящее:

Option Explicit
Sub main()
    Dim swApp As SldWorks.SldWorks
    Dim swModel As SldWorks.ModelDoc2
    Dim nRetVal As Long
   
    Set swApp = CreateObject("SldWorks.Application")
    Set swModel = swApp.ActiveDoc
 
    nRetVal = swModel.SetFeatureManagerWidth(420)
   
End Sub

 

Ссылка на сообщение
Поделиться на других сайтах
  • 1 месяц спустя...

Макрос для удаления подвешенных размеров в модели:

Option Explicit
Dim swApp           As SldWorks.SldWorks
Dim swModel         As ModelDoc2
Dim boolstatus      As Boolean
Dim swAnn           As Annotation
    
Sub main()
    Set swApp = Application.SldWorks
    Set swModel = swApp.ActiveDoc

    swModel.ClearSelection2 (True)
        Set swAnn = swModel.GetFirstAnnotation2
        Do While Not swAnn Is Nothing
            If swAnn.IsDangling Then
                boolstatus = swAnn.Select3(True, Nothing)
            End If
            Set swAnn = swAnn.GetNext3
        Loop
        boolstatus = swModel.DeleteSelection(True)

    swModel.ClearSelection2 (True)
    
End Sub

 

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

Макрос для удаления подвешенных размеров в чертеже:

Скрытый текст

Option Explicit
    
Sub main()
Dim swApp           As SldWorks.SldWorks
Dim swModel         As ModelDoc2
Dim swDraw          As DrawingDoc
Dim swSheet         As Sheet
Dim swView          As View
Dim boolstatus      As Boolean
Dim swAnn           As Annotation
Dim vSheetNames     As Variant
Dim i               As Integer

    Set swApp = Application.SldWorks
    Set swModel = swApp.ActiveDoc
    
    If swModel.GetType <> SwConst.swDocumentTypes_e.swDocDRAWING Then Exit Sub
    Set swDraw = swModel
    
    swModel.ClearSelection2 (True)
    vSheetNames = swDraw.GetSheetNames
    For i = 0 To UBound(vSheetNames)
        swDraw.ActivateSheet vSheetNames(i)
        Set swSheet = swDraw.Sheet(vSheetNames(i))
        Set swView = swDraw.GetFirstView
        Do While Not swView Is Nothing
            Set swAnn = swView.GetFirstAnnotation3
            Do While Not swAnn Is Nothing
                If swAnn.IsDangling Then
                    boolstatus = swAnn.Select3(True, Nothing)
                End If
                Set swAnn = swAnn.GetNext3
            Loop
            Set swView = swView.GetNextView
        Loop
        boolstatus = swModel.DeleteSelection(True)
        swModel.ClearSelection2 (True)
    Next i
    swModel.ClearSelection2 (True)
    
End Sub

 

 

Ссылка на сообщение
Поделиться на других сайтах
  • 2 недели спустя...
В 22.05.2017 в 17:18, shalenna сказал:

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

В контекстном меню появился пункт "заморозка" , но при выборе тоже никакой реакции. Solid 2017 sp2. Win 7.

Та же самая фигня. Ставишь убираешь галочку - всё одно - полосы нет. Глюк появился в 2017 солиде на моём компе. Но на других компах работает.

Ссылка на сообщение
Поделиться на других сайтах
  • 1 месяц спустя...

Здравствуйте!

Вставляем в чертеж развертку (flat pattern) листовой детали.

При простановке параметров гибов (bend notes) углы автоматически указываются с точностью до второго знака после запятой.

Как изменить точность углов в behd notes? В частности - нужно округлить до целых значений.

В файле bendnoteformat.txt этого нет, манипулирование с точностью в шаблоне чертежа тоже не помогли....

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

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

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

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

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

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

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

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

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

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

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




  • Сообщения

    • lem_on
      ну с дуру известно что сломать можно.
    • Viktor2004
      руку привязки так сломать легко
    • lem_on
      По моему вполне логично если станок вывалится в ошибку если рука не доехала до места. У меня так же если кулачки или деталь на пути, просто пихаеш ее до места и станок опять активен. Но нынешние пановья даже не могут написать модель станка.
    • Viktor2004
      Я согласен что скорее всего проблема механическая Но если логика прописана криво и возможно не предусмотрела остановку в промежуточном состоянии, разве не логично будет попробовать принудительно подав напряжение дернуть эту руку вверх-вниз? Возможно то что туда попало выпадет  
    • Guhl
      Если оставить за скобками вопрото том, что до м19 работает нормально, а после нет, то вы не считали сколько у него реально импульсов на оборот? с помощью стороннего плк, например  А если ориентацию м5 снимать, а не м20?
    • lem_on
      Что это за станок такой в котором сразу ладер ковырять надо, даже не смотря на возможность механической проблемы? Или профдеформация?
    • Viktor2004
      не сразу я понял в чем вопрос. Долго соображал что такое режим управления скоростью. При завершении ориентации PMC снимает сигнал G70.6 ? И если он после снятия сигнала продолжает удерживать шпиндель, при каких условиях эта ориентация все же снимается? После нажатия аварийного грибка или еще как?
    • Viktor2004
      Ладдер пришлите. Будем принудительно пробовать поднимать и опускать
    • streamdown
      Коллеги приветствую! IPS 8. Подскажите пожалуйста, кто какое серверное железо использует? Интересуют параметры при одновременной работе, ну например, 400 пользователей онлайн
    • gudstartup
      так он так и позиционируется по m19 pmc выдает g70.6 а чпу отвечает f45.7 но ориентацию и смещение в 4077 он отрабатывает нормально шпиндель встает ровно и смена происходит хорошо. вопрос почему после ввода команды управления скоростью он все еще продолжает контролировать число импульсов между нуль метками хотя в принципе уже должен отменить позиционный контроль и просто считать обороты по 0 метке как он это делает без М19? это все понятно но почему оно продолжает проверять это после завершения ориентации мне непонятно
×
×
  • Создать...