二次开发：获取某个打印机纸张列表出错，在AutoCAD却正常，帮看看。
(vla-put-CanonicalMediaName layout (nth index (GetPaperList2 configName)));;;获得某打印机纸张类型列表, 例:(setq PaperSizes (GetPaperList2 "PublishToWeb JPG.pc3" ))
(defun GetPaperList2 (configName / app canpapersizearr canpapersizelist canpapersizevar app doc layout)
(vl-load-com)
(setq app (vlax-get-acad-object) doc (vla-get-activedocument app) layout (vla-get-activelayout doc))
(vla-put-configname layout configName) ;将打印机设为当前打印机
(vla-RefreshPlotDeviceInfo layout)
(setq CanPaperSizeVar (vla-GetCanonicalMediaNames (vla-item (vla-get-layouts doc) "Model"))
CanPaperSizeArr (vlax-variant-value CanPaperSizeVar)
CanPaperSizeLIst (vlax-safearray->list CanPaperSizeArr))
)没有找到相关结果
已邀请:
1 个回复
lena
赞同来自:
个人开发的简单插件或单一问题。
渠道：通过邮件描述您的问题（标题写明语言如 lisp VB .net 等，内容详细描述您的问题，附带Demo最好），发送至support_dev@gstarcad.com
服务：浩辰开发工程师定期处理邮件问题。