Спецификация для SW по ГОСТ

[Leon 442]

Пакет макросов SWPlus

 

Здесь представлены VBA версии пакета макросов SWPlus. Также существует .Net ветка пакета, отпочковавшаяся от данной ветки в 2014 г. и поддерживаемая уважаемым @fox1001.

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

На данный момент разработка пакета макросов ПРЕКРАЩЕНА. По жалобам пользователей будут устранятся только критические ошибки и проблемы совместимости с новыми версиями SW. 

 

Состав и назначение пакета макросов:
SpecEditor - создание спецификаций (обычной и групповой по варианту Б) и ведомости покупных;
MProp - заполнение свойств моделей;
DProp - управление листами чертежа;
SProp - заполнение свойств моделей из разделов Стандартные изделия, Прочие изделия и Материалы;
SaveDRW - сохранение чертежа;
SaveAsPDF - сохранение чертежа в формате PDF и TIFF;
Master - создание шаблонов основных надписей;
TT - заполнение технических требований;
Roughness - простановка знака неуказанной шероховатости в углу чертежа;
RecordDimM - редактирование текста размеров;
CoolOut - преобразование размеров, проставленных с помощью инструмента "Условное обозначение отверстия", к виду по ЕСКД.

Важные советы:

Совет 1. Прочтите описание.
Совет 2. При возникновении ошибки при первом запуске макросов необходимо нажать кнопку Debug, далее зайти в меню Tools-References, убедиться в отсутствии потерянных библиотек (если таковые есть - подключить их), нажать ОК, закрыть окно с кодом макроса и снова запустить его.

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

Совет 4. Убедитесь, что папка с макросами доступна SW для записи.

Совет 5. Для работы макроса SaveAsPDF в режиме печати на виртуальный принтер необходимо установить программу PDFCreator версии 1.2.1.

 

Описание архивов:

SWPlus 2014 SP0.0 - версия пакета SWPLus, адаптированная для SW2014 SP5.0.

SWPlus 2017 SP0.0 - версия пакета SWPLus, адаптированная для SW2017 SP4.1.

RecordDimM 2017 SP0.1 - исправленный макрос из пакета SWPlus 2017 SP0.0.

PDFCreator-1_2_1_setup - дистрибутив PDFCreator версии 1.2.1.

 

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

 

 

GriSt прав, пускай будет отдельная тема.
Начало смотри http://fsapr2000.ru/index.php?showtopic=6071&st=40
Итак, кратко:
1. Есть неудовлетворенность существующими на сегоднящний день программами для создания спецификаций под SW.
2. Есть желание взяться за самостоятельную разработку такого продукта.
3. Есть понимание, что дело это долгое и не простое, но интересное и в случае успешного завершения ИМХО устранит последний серьезный пробел в соответствии солида ЕСКД.
4. Если даже все и заглохнет, как неоднократно бывало, то останется информация для более удачливых разработчиков.

Вот некоторые топики этого форума где ранее обсуждались вопросы, связанные со спецификацией:
http://fsapr2000.ru/index.php?showtopic=3525&st=0
http://fsapr2000.ru/index.php?showtopic=2943&st=0
http://fsapr2000.ru/index.php?show...hl=спецификация
http://fsapr2000.ru/index.php?show...hl=спецификация
http://fsapr2000.ru/index.php?show...hl=спецификация

OldCAM
Родная солидовская спецификация не устраивает как минимум по 2 причинам:
1. Нет деления на разделы.
2. Нет разбивки на страницы.
Но воспользоваться ее функциями, которые наверняка представлены в API думаю можно

 

 

SWPlus_v_2014_SP0.0.zip

SWPlus_v_2017_SP0.0.zip

 

RecordDimM_v_2017_SP0.1.zip

PDFCreator-1_2_1_setup.zip

[un_wn 1]

Возникла проблема в спецификации:

Создались строчки 72, 73, 74 которые пустые и ниначто не ссылаются, стоят прочерки вместо позиций и количество.

Детали старые, создавались без макросов.

С частью деталей проблема решилась заполнением свойств макросами. Но есть детали и подсборками (проблема со всеми подсборками) где проблема осталась.

Может кто сталкивался с подобным?

[приборист 2]

SWPlus_v_07_sp_0-1.zip

ПО отношению к SWPlus_v_07_beta_3 это более поздняя версия.

Иеще как вбить название своей фирмы M prop У меня не получается

Простите за тугоумство

[SERoz 201]

Иеще как вбить название своей фирмы M prop У меня не получается

В папке MProp есть файл MProp_Firm.txt...

Правила "вбивания" читай в справке к макросам (файл - SWPlus.chm)...

[Leon 442]

Создались строчки 72, 73, 74 которые пустые и ниначто не ссылаются, стоят прочерки вместо позиций и количество.

Похоже, что это строчки для заготовки. Но с незаполненными полями.

[приборист 2]

В папке MProp есть файл MProp_Firm.txt...

Правила "вбивания" читай в справке к макросам (файл - SWPlus.chm)...

Преемного благодарен!!!!!!!!!!!!!

[SERoz 201]

Создались строчки 72, 73, 74 которые пустые и ниначто не ссылаются, стоят прочерки вместо позиций и количество.

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

Ну если ссылки на деталь не будет - тады просто пустая позиция (может и сбой)

[fox1001 789]

Все идет к тому, что скоро лично я этим заниматься не смогу.

SWPlus_v_06_beta до сих пор мои нужды перекрывает с избытком . есть только одно "НО" - надо бы SWPlus на NET перевести (для полного щастя )

Leon, респект

То что Вы (уважаемый) сделали с лихвой хватает для работы.

нечеловечески верные слова

[приборист 2]

SWPlus_v_06_beta до сих пор мои нужды перекрывает с избытком . есть только одно "НО" - надо бы SWPlus на NET перевести (для полного щастя )

Leon, респект

нечеловечески верные слова

Я до этого мало работал с моделями. В 2Д основном (DeltaCADe). Очень мощная чертилка Как говорят

"Автокад нервно курит в стороне" но оформление хоть и на порядок быстрее (при создании собственных) библиотек (кстати весьма просто) и форматок,но все равно объемно.

Но заполнение СП вручную (можно написать макросы в бейсике, а если не владеешь) просто мрак как и в во всех ГАДАХ

Перейдя в Солид и СП от LEONa!!!!!!!!!!

Просто отдыхаю душой

Кстати чевойто некоторые скулят "мол чертежи сложно в нем оформлять" Не понимаю их

[KONSTR22 0]

Здравствуйте. Не могу настроить макросы, нужн совет.

Добавив кнопки макросов на панель и отредактировав чертёжный стандарт, столкнулся с проблемой: запускаю мастер настроек, жму кнопку настройки и сразу же выскакивает экран с ошибкой: Run-time error 13: Type mismatch.

Код ошибки:

FrmMaster.MyStandard

TxtFontName.Value = stdFontName

If stdFontItalic = 1 Then

ChkFontItalic.Value = True

Else

ChkFontItalic.Value = False _linenums:0'>Private Sub UserForm_Activate()HWNDActiveWindowFrmMaster.MyPropertiesIf prpTestStandard = 1 Then FrmMaster.MyStandard TxtFontName.Value = stdFontName If stdFontItalic = 1 Then ChkFontItalic.Value = True Else ChkFontItalic.Value = False

В чём проблема? Библиотеки подключены, вроде, все.

[Leon 442]

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

[KONSTR22 0]

Sub MyStandard()
' Чтение ini файла
Open Source7 For Input As #1
   Line Input #1, strTemp ' Шрифт
   stdFontName = strTemp
   Line Input #1, strTemp ' Размер шрифта
   stdFontSize = CDbl(strTemp)
   Line Input #1, strTemp ' Наклонный
   If strTemp = "1" Then
       stdFontItalic = 1
   Else
       stdFontItalic = 0
   End If
   Line Input #1, strTemp ' Жирный
   If strTemp = "1" Then
       stdFontBold = 1
   Else
       stdFontBold = 0
   End If
       Line Input #1, strTemp
   stdDay = strTemp
   Line Input #1, strTemp
   stdMonth = strTemp
   Line Input #1, strTemp
   stdYear = strTemp
   Line Input #1, strTemp
   stdHour = strTemp
   Line Input #1, strTemp
   stdMinute = strTemp
   Line Input #1, strTemp
   stdSecond = strTemp
Close #1
' Проверяем дату у файла стандарта
MyDateTime = FileDateTime(Source15)
If stdDay = Day(MyDateTime) And stdMonth = Month(MyDateTime) And stdYear = Year(MyDateTime) And stdHour = Hour(MyDateTime) And stdMinute = Minute(MyDateTime) And stdSecond = Second(MyDateTime) Then
Else
   strTemp = swApp.GetUserPreferenceStringValue(swDefaultTemplateDrawing)
   Set swDraw1 = swApp.NewDocument(strTemp, 0, 0, 0)

Возник ещё один вопрос: почему при перезагрузке SW слетает чертёжный стандарт (выбирается стандарт GL11).

Забыл уточнить, SW 2010 sp5; SWPlus 05.

P.S. Нужно ли указывать какой-либо путь в пункте местоположение файлов?

Изменено 19 июля 2012 пользователем KONSTR22

[streamdown 1 567]

Нужно ли

По порядку:

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

2. Воспользоваться макросом Master, в котором указать путь + всё нужное

3. Не перемещать после всех манипуляций с путями, файлы макросов и не нарушать структуру папок/файлов

3.1 С кириллицей в пути у меня (да и, наверное, у всех) всё работает.

слетает чертёжный стандарт

удалите все строчки в "настройки пользователя-месторасположение файлов-шаблоны документов". Добавьте вручную путь "D:\SWPlus\Шаблоны" (как пример) к менюшке шаблоны документов

Все ваши вопросы связаны с обычной настройкой макросов, никаких косяков солида или ваших.

На всякий случай, попробуйте почитать *.CHM файл, приложенный к набору макросов; там есть ответы на вопросы, которые вы (подразумевали/хотели) задать.

[KONSTR22 0]

В настройках самого солида указать путь к шаблонам

Работаю в SW 2010 sp5, макросы добавил SWPlus 05, а в ней нет папки с шаблонами. Попробовал указать путь к шаблонам SWPlus 07, солид заругался на более новую версию файлов.

При настройке Masterом возникает ошибка: в окне настройка оформления при нажатии кнопки "Настроить шаблон чертежа" появляется ошибка

Private Sub CmdRun_Click()strMsg = "Будет изменен шаблон чертежа, указанный в настройках SW:" & Chr$(10) & Source3 & Chr$(10) & "Продолжить?"lRetval = swApp.SendMsgToUser2(strMsg, swMbWarning, swMbYesNo)If lRetval = swMbHitYes Then    Set swDraw1 = swApp.OpenDoc6(Source3, swDocDRAWING, swOpenDocOptions_Silent, "", longstatus, longwarnings)    Set swModExt = swDraw1.Extension    ok = swModExt.LoadDraftingStandard(Source4)    swDraw1.Save2 False    Set swDraw1 = Nothing    swApp.QuitDoc Source3End IfEnd Sub

попробуйте почитать *.CHM файл

Я его перечитал на несколько раз...но всё равно немогу настроить как надо.

Воспользоваться макросом Master, в котором указать путь + всё нужное

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

[un_wn 1]

Работаю в SW 2010 sp5, макросы добавил SWPlus 05, а в ней нет папки с шаблонами.

Попробуйте 7-ю версию, у меня под такой же версией солида макросы работают.

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

В строке "Путь сохранения" надо указывать:<<путь к папке с основными надписями. Если указываете свою папку, то не забудьте обязательно завершить строку с адресом - "слешем".>> взято из справки.

[KONSTR22 0]

Попробуйте 7-ю версию

А как же быть с шаблонами, которые сделаны в более свежей версии?

путь к папке с основными надписями

Основные надписи - это, как я понимаю, всё то, что заносится в штамп чертежа.? Где это всё лежит?

[un_wn 1]

А как же быть с шаблонами, которые сделаны в более свежей версии?

А не знаю У меня переход с 6 на 7 версии не вызвал вообще никаких проблем с шаблонами. Думаю у Вас тоже все пройдет хорошо.

Основные надписи - это, как я понимаю, всё то, что заносится в штамп чертежа.? Где это всё лежит?

Основные надписи это файлы slddrt вида A0-A-1, A4-P-1 и т.д. в седьмой версии макросов лежат в папке "Основные надписи", хотя можно и свое расположение задать в строчке "Путь сохранения" макроса Master.

[streamdown 1 567]

KONSTR22

дельный совет:

Попробуйте 7-ю версию,

Изменения, бывает, Леон вводит кардинальные (на уровне кода).

Ошибка, которая связана с потерей файлов, это варианты: либо путь к файлам (любым, которые требует макрос) не прописан (обычно достаточно для этого макрос Master) в INI файлах; либо путь к файлам указан без последнего слеша "\" (т.е. "C:\новая 2" вместо "C:\новая 2\"); либо нарушена структура.

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

[KONSTR22 0]

Сейчас попробую!

Необходимо уточнение...правильно я понимаю, что кнопки макросов добавлятся отдельно для детали, отдельно для чертежа и сборки? К примеру в деталях достаточно 2-х кнопок:

1. MProp - для заполнения свойств моделей;

2. SProp - для заполнения свойств моделей из разделов Стандартные изделия, Прочие изделия и Материалы.

Изменено 19 июля 2012 пользователем KONSTR22

[streamdown 1 567]

кнопки макросов добавлятся отдельно

У меня так: на деталях и сборках Mprop и Sprop. В чертеже все остальные.

[KONSTR22 0]

Переставил с 05 на 07 макросы. Жму на Master-нет реакции. Что-то непонятное у меня происходит с ними

Меняю обратно-запускаются...но сошибками.

Изменено 19 июля 2012 пользователем KONSTR22