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

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Импорт наборов параметров листа из другого чертежа

Импорт наборов параметров листа из другого чертежа

Ответ
Поиск в этой теме
Непрочитано 19.01.2012, 12:13 #1
Импорт наборов параметров листа из другого чертежа
Psyakrev
 
Регистрация: 17.06.2010
Сообщений: 438

Интересует именно программное решение, штатными средствами слишком много лишних движений.
Мой вариант (черновой)
Код:
[Выделить все]
 (defun c:import-plotconfigs ( / )
  (setq source_file "C:\\acad\\source.dwt")
  (vl-load-com)
  (setq *acad-app (vlax-get-acad-object))
  (setq *acad-doc (vla-get-ActiveDocument *acad-app))
  (setq *acad-plotconfigs (vla-get-plotconfigurations *acad-doc))
  (setq *acad-sourcedoc (vla-open (vla-get-documents *acad-app) source_file))
  (setq *acad-sourceplotconfigs (vla-get-plotconfigurations *acad-sourcedoc))
  (vlax-for obj *acad-plotconfigs (vla-delete obj))
  (vlax-for obj *acad-sourceplotconfigs
    (setq obj2 (vla-add *acad-plotconfigs (vla-get-name obj)))
    (vla-copyfrom obj2 obj)
    )
  (vla-close *acad-sourcedoc :vlax-false)
  )
Программка работает правильно, но слишком долго - порядка 10-15 секунд (в шаблоне 19 наборов, файлы практически пустые). Есть ли более быстрые варианты решения?
Просмотров: 3442
 
Непрочитано 20.01.2012, 10:49
1 | #2
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,992


Вот еще пару вариантов
1.
Код:
[Выделить все]
(setq source_file "C:\\acad\\source.dwt")
(command "_-psetupin" source_file "*")
2. Steal from Drawing
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Автор темы   Непрочитано 20.01.2012, 14:48
#3
Psyakrev


 
Регистрация: 17.06.2010
Сообщений: 438


Спасибо, разобрался сам - код медленно выполнялся из-за того, что в качестве принтера по-умолчанию был выбран реальный принтер, после выбора виртуального пдф принтера скорость выполнения заметно выросла (PlotConfiguration создаются с назначенным по-умолчанию принтером).
Psyakrev вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Импорт наборов параметров листа из другого чертежа

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Несвойственные Автокаду вещи Vova AutoCAD 49 01.02.2012 19:33
Как применить именнованый набор параметров листа к листу игорёк Программирование 2 08.09.2008 11:54
Программная печать из листа с учетом его параметров. TheBuTeK Программирование 27 08.08.2008 21:58
Из листа одного файла в лист другого Red Nova AutoCAD 17 19.01.2008 16:31
Как распечатать 2 чертежа, допустим, на 2 листа? Даурен AutoCAD 3 01.08.2006 14:06