Тема: Создание чертежа по шаблону
Добрый день. Пытаюсь написать функцию для создания чертежа по шаблону. Вот мой код. Подскажите в чём ошибка?
(defun c:newdrawing ()
(setq acapp (vlax-get-acad-object))
(setq acdoc (vla-get-ActiveDocument acapp))
(setq tmplt "C:\\N\\Shablon.dwt")
(vla-Add vla-get-Documents acdoc tmplt)
(vla-put-FullScreen acdoc :vlax-true)
(vla-put-ActiveViewport
(vla-get-ActiveLayout acdoc)
(vla-get-ActiveViewport
(vla-get-ActiveLayout acdoc)))
(princ "New drawing created.")
(princ)
)
ы
Похоже здесь не работает загрузка шаблона. При этом сам файл находит хорошо.