CAD БИБЛИОТЕКА
Показать сообщение отдельно
Непрочитано 29.09.2020, 07:41 #1
Выгрузка файла частичной адаптации cuix
olga87
 
Регистрация: 28.05.2007
Сообщений: 145

Здравствуйте Уважаемые программисты!

Код ниже при запуске Автокада 2020 (с помощью acad.lsp) выгружает файл частичной адаптации test.cuix (UnloadTestmenu "test").
Но есть проблема: если после запуска Автокада обнаруживается, что этот файл частичной адаптации в состоянии "Не обработана", например, был сбой и отсутствовал доступ к файлу acad.lsp, то при возвращении доступа к acad.lsp и перезапуске Автокада файл частичной адаптации test с первого раза не выгружается. Выгружается он при втором запуске Автокада.
Подскажите пожалуйста как исправить код ниже, чтобы test в адаптации выгружался при любом (первом) запуске Автокада.
Поправка: замечено что файл адаптации test не выгружается с 1-го раза, если файл test.cuix расположен (присутствует) в путях доступа Автокада (другими словами с 1-ым запуском Автокад файл адаптации обрабатывает, а со 2-го выгружает). Если же при запуске Автокада файл test.cuix не найден Автокадом, то выгрузка работает с 1-го раза.
Заранее спасибо!

Код:
[Выделить все]
(defun UnloadTestmenu (mgroup / obj)
  (if
    (not
      (vl-catch-all-error-p
        (setq obj
          (vl-catch-all-apply
            'vla-item
            (list
              (vlax-get-property
                (vlax-get-acad-object)
                'Menugroups
              )
              mgroup
            )
          )
        )
      )
    )
    (progn
      (vlax-invoke obj 'Unload)
      'T
    )
  )
)

Последний раз редактировалось olga87, 29.09.2020 в 07:49.
Просмотров: 1121
 
Размещение рекламы