Page 93 - 6735
P. 93

структури  типу  DrawingData.  Програма  складається  з  модулів
           DrawingView,      DrawingSheet,      DrawingData,      Macro21,
           UserForm1  (рис.  3.7).  Модуль  DrawingView  містить  опис  класу
           виду, модуль DrawingSheet – класу листа, модуль DrawingData –
           класу, що описує дані усього креслення. Модуль  Macro21 містить
           реалізацію  процедур  для  побудови  креслення  за  даними
           DrawingData      (GenerateDrawing),     перебудови     креслення
           (UpdateDrawing),  головну  процедуру  (main)  та  інші  допоміжні
           функції.  Робота  програми  починається  з  процедури  main,  де
           створюється тестовий об’єкт класу DrawingData та викликаються
           процедури  GenerateDrawing  або  UpdateDrawing.  Іншим
           способом  роботи  з  програмою  є  виконання  модуля  UserForm1,
           який  створює  вікно  для  введення  та  редагування  даних
           DrawingData  (рис.  3.7).  У  вікні  можна  вибрати  потрібний  лист  і
           вид,  змінити  значення  атрибутів  виду,  зберегти  їх  (кнопка  Save),
           створити  креслення  (конопка  GenerateDrawing)  або  перебудувати
           існуюче (кнопка UpdateDrawing).
              Для  роботи  програмі  необхідна  SOLIDWORKS  2015-2018.  У
           інших версіях програма не тестувалась. Послідовність  установки і
           виконання:
              1. Скопіювати в довільне місці на диску каталог, який містить
           наступні файли:
                updateDrawing.swp – макрос SOLIDWORKS мовою VBA,
                 Drawing1.SLDDRW  –  креслення,  яке  містить  згенеровані  і
           додані вручну види (рис. 3.9),
                Part1.SLDPRT – довільна деталь з двома конфігураціями (рис.
           3.8),
                Part2.SLDPRT – довільна деталь з двома конфігураціями,
                a3-gost_sh1.slddrt – шаблон листа креслення.
              2. Виконати макрос із SOLIDWORKS так: Tools\Macro\Run... та
           вибрати  макрос  updateDrawing.swp.  Зявиться  вікно  де  потрібно
           вибрати  «Да»  для  генерації  креслення  та  «Нет»  для  обновлення
           креслення Drawing1.SLDDRW (рис. 3.9).


                                          93
   88   89   90   91   92   93   94   95   96   97   98