xiaocainiao 发表于 2024-4-23 15:40:04

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

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

qq1846687144 发表于 2025-1-26 16:11:17

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

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

qq1846687144 发表于 2025-1-26 16:13:14

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)了
页: 1 [2]
查看完整版本: 难题求教!如何获取图层在对应视口中的视口颜色和线型