5

Translate

Найти

понедельник, 5 декабря 2016 г.

Установка макросов в Solidworks

1) Установка макросов работающих на исполняемом файле.

Установку разберем на примере макроса "Основная надпись - автор Kelny", в SolidWorks 2005 (в последующих версия Solidworks процедура аналогичная).
Создаем папку "Основная надпись" в корневом каталоге SolidWorks, распаковываем архив с макросом в папку, открываем любой чертеж (создаем новый). Меню инструменты, настройка, вкладка команды, находим категорию макросы, левой кнопкой мыши перетаскиваем иконку "Создать кнопку для макроса" в удобное место на панели инструментов.

Появляется окно "Настройка кнопки макроса"

Выбираем иконку для кнопки - Выбрать образ (находится в архиве плагина),

показываем макрос для запуска,

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

Готово. Нажимаем иконку "Основная надпись”


Для запуска произвольного exe-шника есть два простых варианта:
  1. Вот этот макрос (использован макрос из SWRama) запускает exe-шник с одноименным названием, т.е. переименуйте этот макрос например в "notepad.exe" и положите рядом с ним. Теперь добавляйте макрос на панель инструментов или назначайте горячую клавишу. Два условия: имя файла макроса должно совпадать с именем exe-шника без расширения и сам exe-шник должен находится в одном каталоге с макросом.
    Код

    Dim Sourrce As String
    Dim swApp As Object

    Sub main()
    Set swApp = Application.SldWorks
    ' Run the custom property application
    Source = swApp.GetCurrentMacroPathName             ' Get macro path+filename
    Source = Left$(Source, Len(Source) - 3) + "exe"    ' Set source filename

    MyAppID = Shell(Source, 1)
    End Sub


  2. Вот этот макрос запускает notepad.exe, т.е. в тело макроса "вбит" путь к  exe-шнику. Вы можете отредактировать путь exe-шника в макросе (инструменты-макрос-редактирование).
    Код

    Dim Sourrce As String
    Dim swApp As Object

    Sub main()
    Set swApp = Application.SldWorks
    ' Run the custom property application
    Source = "C:\Windows\notepad.exe"             ' Get macro path+filename

    MyAppID = Shell(Source, 1)
    End Sub




2) Установка макроса скомпилированного в dll. В Solidworks надо просто открыть соответствующую dll. Файл – Открыть, тип файлов выбираем Add-Ins, показываем dll

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

Заходим в Инструменты – Добавления. Видим, что макрос установлен.


!!! Следует отметить, что dll для 32-х битного Solidworks не подходит для 64-х битного, ищите для SW 64-х.
3) Установка макросов *.swp.
Установка происходит так же, как и в  случае "Установка макросов работающих на исполняемом файле”.

Комментариев нет:

Отправить комментарий