明经CAD社区's Archiver
社区
›
AutoLISP/Visual LISP 编程技术
› 删除重复实体(SLdesign V3.0集成)
wzg356
发表于 2025-5-12 18:57:11
本帖最后由 wzg356 于 2025-5-12 18:58 编辑
判断2个图元是重叠,含颜色等数据重叠
(setq es1(entget e1) es2(entget e2))
(equal
(vl-remove (assoc 5 es1)(vl-remove (assoc -1 es1)es1))
(vl-remove (assoc 5 es2)(vl-remove (assoc -1 es2)es2))
1e-5
)
页:
1
[2]
查看完整版本:
删除重复实体(SLdesign V3.0集成)