gaics 发表于 2023-6-20 16:22:54

在模型空间显示打印样式

本帖最后由 gaics 于 2023-6-21 07:50 编辑

如题，找了好久控制“显示打印样式”的系统变量也没找到，现在终于可以实现了！

gaics 发表于 2023-6-21 13:11:30

;;;还原设置
(defun c:hy ()
(vla-put-ShowPlotStyles
    (vla-get-ActiveLayout
      (vla-get-ActiveDocument (vlax-get-acad-object))
    )
    :vlax-false
)
(vla-put-GraphicsWinModelBackgrndColor
    (vla-get-display
      (vla-get-Preferences (vlax-get-acad-object))
    )
    (vlax-make-variant 0 19)                ;背景颜色设置为黑色
)
(vla-regen
    (vla-get-ActiveDocument (vlax-get-acad-object))
    AcAllViewPorts
)
(setvar "LWDISPLAY" 0)
(princ)
)

nsh935 发表于 2023-6-20 16:47:18

没反应过来 具体效果是？

gaics 发表于 2023-6-21 07:51:12

nsh935 发表于 2023-6-20 16:47
没反应过来 具体效果是？

就是让模型空间或者图纸空间按照打印样式来显示。已上传示例图片。

Bao_lai 发表于 2023-6-21 08:06:19

这个自带的lisp样例中就有呀。

gaics 发表于 2023-6-21 08:37:17

Bao_lai 发表于 2023-6-21 08:06
这个自带的lisp样例中就有呀。

噢，没注意:L

Bao_lai 发表于 2023-6-21 12:16:28

gaics 发表于 2023-6-21 08:37
噢，没注意

vla-get-ShowPlotStyles 函数
功能   判断是否在打印中使用打印样式。
语法及参数
(vla-get-ShowPlotStyles Object )
Object         Layout, PlotConfiguration
                  这个属性适用的对象
ShowPlotStyles    布尔; 读/写
                        TRUE: 打印中使用打印样式
                        FALSE: 打印中不使用打印样式
说明
    当这个属性的初始值是TRUE时，对象是以它们在图形文件中指定的打印样式打印。

gaics 发表于 2023-6-21 13:08:39

Bao_lai 发表于 2023-6-21 12:16
vla-get-ShowPlotStyles 函数
功能   判断是否在打印中使用打印样式。
语法及参数


对，就是用的这个函数

hzyhzjjzh 发表于 2023-6-23 12:50:37

谢谢分享。{:1_1:}
页: [1]
查看完整版本: 在模型空间显示打印样式