(setq
app (vlax-get-acad-object)
doc (vla-get-activedocument app)
layout (vla-get-activelayout doc)
)
(vla-put-stylesheet layout "monochrome.ctb")
(vla-put-ShowPlotStyles layout :vlax-true) linyangmjtd 发表于 2021-11-28 22:11
;导出图形设置成黑白色
(setq
app (vlax-get-acad-object)
楼主,这段代码放在哪个位置?不知为何我的输出图形没变化还是彩色的? likongshun 发表于 2021-12-2 22:38
楼主,这段代码放在哪个位置?不知为何我的输出图形没变化还是彩色的?
放置在切换到临时布局之后,设置临时布局的打印颜色。
(if (HAS "LAYOUTS" "临时布局")
(princ)
(command "layout" "n" "临时布局");创建并切换布局
)
(command "layout" "s" "临时布局")
(command "tilemode" "0")
linyangmjtd 发表于 2021-12-3 08:29
放置在切换到临时布局之后,设置临时布局的打印颜色。
(if (H ...
试了下可以了,感谢楼主回复! 感谢分享!!! 收藏,WMF输出 楼主 输出怎么设置原大小 背景跟模型空间一样。我现在输出 再输入回来尺寸就变了,有没有办法做到是1:1的? xman00 发表于 2021-11-21 22:03
如果可以复制到剪贴板,类似betterwmf的效果就好了
有没有大佬做出这个的效果来?
悬赏一下
页:
1
[2]