- UID
- 121690
- 积分
- 0
- 精华
- 贡献
-
- 威望
-
- 活跃度
-
- D豆
-
- 在线时间
- 小时
- 注册时间
- 2004-4-5
- 最后登录
- 1970-1-1
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?立即注册
×
假如打开了autocad,当前图纸为drawing1.dwg, 现在想写一段代码让它打开d:\test\drawing3.dwg并且用PDF995打印机把它打印成PDF, 代码如下,但是打印出来的总是drawing1, 而不是想要的drawing3, 请个位高手斧正。谢谢!
(defun c:go ()
(setq AcadObject (vlax-get-acad-object))
(setq ActiveDocument
(vla-get-ActiveDocument AcadObject)
)
(setq AcadDocuments (vla-get-documents AcadObject))
(setq AcadDocument
(vla-open AcadDocuments
"d:\\test\\drawing3.dwg"
)
)
(vla-put-activedocument AcadObject AcadDocument)
(vla-plottodevice
(vla-get-plot
AcadDocument
)
"PDF995"
)
(vla-close AcadDocument :vlax-false)
(vlax-release-object AcadDocument)
(vlax-release-object AcadObject)
) |
|