| Правила | Регистрация | Пользователи | Сообщения за день |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > AutoCAD > Поставить галочку "показать стили печати" в окне &

Поставить галочку "показать стили печати" в окне &

Ответ
Поиск в этой теме
Непрочитано 16.08.2007, 09:46 #1
Поставить галочку "показать стили печати" в окне &
Makswell
 
Инженер-строитель
 
Киров
Регистрация: 15.08.2007
Сообщений: 2,204

Нужно поставить галочку "показать стили печати" в окне "Параметры листа->устройство печати" не открывая данное окно
Подскажите, может быть есть системная переменная, или какая-нибудь реализация на лиспе
Просмотров: 2529
 
Непрочитано 16.08.2007, 09:53
#2
Хмурый


 
Регистрация: 29.10.2004
СПб
Сообщений: 16,336


Команда работает в командной строке без диалогового окна

PS это я не о том, маленько...
Хмурый вне форума  
 
Непрочитано 16.08.2007, 10:03
#3
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,844


Код:
[Выделить все]
(defun test (/ adoc)
  (vl-load-com)
  (vla-startundomark
    (setq adoc (vla-get-activedocument (vlax-get-acad-object)))
    ) ;_ end of vla-startundomark
  (vlax-for item (vla-get-layouts adoc)
    (vl-catch-all-apply '(lambda () (vla-put-showplotstyles item :vlax-true)))
    ) ;_ end of vlax-for
  (vla-endundomark adoc)
  (princ)
  ) ;_ end of defun
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Автор темы   Непрочитано 16.08.2007, 10:23
#4
Makswell

Инженер-строитель
 
Регистрация: 15.08.2007
Киров
Сообщений: 2,204


To kpblc:
Ага, галочка ставится, но стили печати почему-то не показываются
Makswell вне форума  
 
Автор темы   Непрочитано 16.08.2007, 10:25
#5
Makswell

Инженер-строитель
 
Регистрация: 15.08.2007
Киров
Сообщений: 2,204


Точнее не стили, а рисунок в соответствии с заданным стилем...
Makswell вне форума  
 
Непрочитано 16.08.2007, 10:28
#6
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,844


Код не тестировал совсем. Вариантов несколько:
1. Выполнить _regenall
2. То же, но программно:
Код:
[Выделить все]
(defun test (/ adoc)
  (vl-load-com)
  (vla-startundomark
    (setq adoc (vla-get-activedocument (vlax-get-acad-object)))
    ) ;_ end of vla-startundomark
  (vlax-for item (vla-get-layouts adoc)
    (vl-catch-all-apply '(lambda () (vla-put-showplotstyles item :vlax-true)))
    ) ;_ end of vlax-for
  (vla-regen adoc acallviewports)
  (vla-endundomark adoc)
  (princ)
  ) ;_ end of defun
3. Попробовать такое:
Код:
[Выделить все]
(defun test (/ adoc)
  (vl-load-com)
  (vla-startundomark
    (setq adoc (vla-get-activedocument (vlax-get-acad-object)))
    ) ;_ end of vla-startundomark
  (vlax-for item (vla-get-layouts adoc)
    (vl-catch-all-apply
      '(lambda ()
         (vla-put-showplotstyles item :vlax-true)
         (vla-update item)
         ) ;_ end of lambda
      ) ;_ end of vl-catch-all-apply
    ) ;_ end of vlax-for
  (vla-regen adoc acallviewports)
  (vla-endundomark adoc)
  (princ)
  ) ;_ end of defun
Что из них заработает, я не знаю.
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Автор темы   Непрочитано 16.08.2007, 10:35
#7
Makswell

Инженер-строитель
 
Регистрация: 15.08.2007
Киров
Сообщений: 2,204


Точно! Как это я про _.regenall не догадался?
Спасибо большое!
Makswell вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > AutoCAD > Поставить галочку "показать стили печати" в окне &

Размещение рекламы