请问为什么在布局使用代码关闭图纸阴影后还是会显示灰色的边框
我用代码关闭布局的图纸阴影后还是会显示灰色的边框,直接在设置手动关闭就不会显示阴影,麻烦各位大佬解答一下(defun c:TT (/ lout display)
(vl-load-com)
(setq lout (vla-Item
(vla-get-layouts
(vla-get-activedocument
(vlax-get-acad-object)
)
)
(getvar "ctab")
)
)
; 设置打印样式表为monochrome.ctb
(vla-Put-StyleSheet
(vla-get-activelayout
(vla-get-activedocument
(vlax-get-acad-object)
)
)
"monochrome.ctb"
)
(setq display (vla-get-display (vla-get-preferences (vlax-get-acad-object))))
(if (= (vla-get-ShowPlotStyles lout) :vlax-true)
(progn
; 关闭显示打印样式
(vla-put-ShowPlotStyles lout :vlax-false)
; 设置线宽显示为0
(setvar "lwdisplay" 0)
; 显示纸张阴影
(vla-put-LayoutDisplayPaperShadow display 1)
; 不显示纸张背景
(vla-put-LayoutDisplayPaper display 0)
; 设置布局背景颜色为黑色
(vla-put-GraphicsWinLayoutBackgrndColor (vla-get-display (vla-get-preferences (vlax-get-acad-object)))
0
)
)
(progn
; 开启显示打印样式
(vla-put-ShowPlotStyles lout :vlax-true)
(setvar "lwdisplay" 0)
(vla-put-LayoutDisplayPaperShadow display 0)
(vla-put-LayoutDisplayPaper display 1)
; 设置布局背景颜色为白色
(vla-put-GraphicsWinLayoutBackgrndColor (vla-get-display (vla-get-preferences (vlax-get-acad-object)))
16777215
)
)
)
(vla-regen (vla-get-activedocument (vlax-get-acad-object)) acAllViewports)
(princ)
)
不明白什么意思 (setenv "ShowPaperBackground" " 0 ")
(setenv "ShowPrintBorder" " 0 ") lxl217114 发表于 2024-2-26 16:37
(setenv "ShowPaperBackground" " 0 ")
(setenv "ShowPrintBorder" " 0 ")
新版本的CAD好像没有这两个变量了,14版的可以用 lxl217114 发表于 2024-2-26 16:37
(setenv "ShowPaperBackground" " 0 ")
(setenv "ShowPrintBorder" " 0 ")
直接在CAD用好像可以,但是加进去之后用起来好像不太理想,图纸背景跟阴影都还在 Chinchillas 发表于 2024-2-27 08:44
直接在CAD用好像可以,但是加进去之后用起来好像不太理想,图纸背景跟阴影都还在
环境变量,应该是得重启一下cad生效的吧,具体的也不是很懂,也是大佬教的,然后也就这样用,没有出现什么问题。 lxl217114 发表于 2024-2-27 10:21
环境变量,应该是得重启一下cad生效的吧,具体的也不是很懂,也是大佬教的,然后也就这样用,没有出现什 ...
好的,谢谢!我再研究研究 https://www.cnblogs.com/JJBox/p/11610343.html#_lab2_1_1
巧了,刚好会
页:
[1]