Вы можете опубликовать сообщение сейчас, а зарегистрироваться позже.
Если у вас есть аккаунт, войдите в него для написания от своего имени.
Примечание: вашему сообщению потребуется утверждение модератора, прежде чем оно станет доступным.
@Leon Доброго дня! в макросе Roughness (простановка общей шероховатости), есть малая неприятность: если активный вид не лист, а любой вид, то обозначение ставится относительно этого вида см.эскиз. Пытался перед вставкой сменить активный вид, но что-то не выходит. Можно как-то подкорректировать?
вставлял вот этот кусок кода в разные места кода, особенно в кнопку "ок"
Dim swView As SldWorks.View
Dim swDraw As SldWorks.DrawingDoc
Dim bRet As Boolean
Set swDraw = ModelDoc2
Set swView = swDraw.ActiveDrawingView
If Not swView Is Nothing Then
Debug.Print swView.GetName2
Set swView = swDraw.GetFirstView
bRet = swDraw.ActivateView(swView.GetName2)
Debug.Print " Active view = " & swView.GetName2
End If
Всем здравствуйте!
Для файлов DXF довольно много прекрасных макросов, и с GUI, и -без, а вот для IGS (SAT, STEP,Parasolid) - как-то скудно (или плохо искал).
Пользуемся простеньким макросом (по сути - файл/сохранить как/IGS) для экспорта IGS для лазерного трубореза , который при активации в сборке вываливает в то же место, и сборка, файлы (с учетом конфигураций добавляется -01, 02 в имя файла).
Потом долго и нудно удаляем ненужные, сопоставляя спецификацию с отображённым материалом, количеством и добавляя Материал и Количество к имени файла (так уж привыкли на производстве).
Вопрос в том, чтобы в имя файла добавлять пользовательские свойства, после этого просто удаляются из общей массы ненужные файлы, глядя на Материал в названии файла. Ну а количество берется тоже из свойств (макрос записывает значение для макроса DXF)
Кто-то может помочь с макросом? Или, возможно, идеей? (в древней теме про такой же вопрос @Kelny отсылал к хелпу, но моих компетенций, видимо недостаточно для осовения этой науки)
Макрос, который создает DXF выдает нам название файла и формирует папки в виде:
Const OUT_NAME_TEMPLATE As String = "[Развертка]\Толщина <$CLPRP:Толщина листового металла>мм\<_FileName_> (исп.<_ConfName_>) - <$PRP:SWP-Материал> - <$CLPRP:Толщина листового металла>мм - R <$CLPRP:Радиус сгиба> - K <$CLPRP:Допуск сгиба> <$PRP:Qty> шт..dxf"
Вот что-то примерное и хотелось бы для IGS.
Сейчас вот это работает:
Option Explicit
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc
Dim nPath As String
Dim FileName As String
Dim NewFileName As String
Sub main()
Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc
If swModel Is Nothing Then
swApp.SendMsgToUser2 "Please open a SolidWork Part/Assembly first and try again!!", swMbWarning, swMbOk
Exit Sub
End If
If swModel.GetType = swDocDRAWING Then
swApp.SendMsgToUser2 "Please open a SolidWork Part/Assembly first and try again!!", swMbWarning, swMbOk
Exit Sub
End If
nPath = Left(swModel.GetPathName, InStrRev(swModel.GetPathName, ".") - 1)
swModel.SaveAs nPath & ".igs"
FileName = nPath & ".igs"
End Sub
В каталогах на ремни оптибелт. Там есть инструкция по расчётам, у других прлизводителей, возможно, будут другие числа. В среднем рекомендуется около 90 градусов обхвата.
Для плат с 10 или 1000 элементами, двух слойных или 8 слойных, цифровой или силовой электроники попасть +-10% с одной плотностью очень большая удача.
Компенсировать все возможные вариации созданием нового материала под конкретные платы очень сложный подход.
Например частичная модернизация оборудования, на которое нет полной документации (читай модели Солидворкс), а само оборудование обрисовывается , большей частью, контурами ....
Нет в этом необходимости, можно задать плате плотность побольше и скомпенсировать вес элементов, а попасть в массу с точностью +-10% нормальный допуск для массы.
Нужно очень сильно изменить деталь, что бы изменения массы стали существенными.
Возможно в других программах это так, но в данной конкретной программе это может плохо сказаться на последующих сборках. Так что в данном случае ручной ввод может испортить расчёты всех последующих сборок, особенно когда эти данные важны (центр тяжести, моменты инерции и т.п.) или даже выносятся на чертежи, а найти такой файл будет проблемой, т.к. он не посвечивается.
Так что всё таки лучше воспользоваться подбором плотности для получения нужной массы, что бы расчёты в последующих сборках были корректны.
А то подмена массы это как на базаре вместо поверенных гирь использовать деревянные или высверленные для взвешивания товара. Или как уже приводили пример выше с размерами, когда реальный размер заменяется иным, что часто приводило к ошибкам - после изменения детали размер не менялся на новое изменённое значение.
Рекомендованные сообщения
Присоединяйтесь к обсуждению
Вы можете опубликовать сообщение сейчас, а зарегистрироваться позже. Если у вас есть аккаунт, войдите в него для написания от своего имени.
Примечание: вашему сообщению потребуется утверждение модератора, прежде чем оно станет доступным.