难题求教！如何获取图层在对应视口中的视口颜色和线型

xiaocainiao

xiaocainiao 发表于 2024-4-23 11:54
大神！这两天用您的代码发现有时候获取不到图层的视口替代特性了、
我自己排查了一下、发现是这段代 ...

谢谢！不用了、我用笨方法解决了

qq1846687144

vitalgg 发表于 2024-4-21 16:44
命令 VPOV

大佬，请问如何更新视口替代颜色呢？用(entity:putdxf od% 420 -1023410168) 后把1023410168添加到原来的420上了。

qq1846687144

vitalgg 发表于 2024-4-21 16:44
命令 VPOV

(foreach
                      od% overdatas
                        (if (and od% (equal (entity:getdxf od% 335) (entity:getdxf vp -1)))
                        ; 遍历当前图层的视口替代信息列表
                        ; od% 是每次循环中代表当前视口替代信息对象的临时变量
                          (progn
                             (princ  "视口颜色组码为:")
                              (princ  (entity:getdxf od% 420))
                              (entity:deldxf od% 420)
                              (princ  "\n 删除后的组码为:")
                              (princ  (entity:getdxf od% 420))
                              (entity:putdxf od% 420 -1023410168) ;-1023410168
                              (princ  "\n 修改后的组码为:")
                              (princ  (entity:getdxf od% 420))
                              (princ "\n")
                           )
                           )
                         ) 直接输出的-1023410121，删除后输出的还是-1023410121，put后就变(-1023410121 -1023410168)了