netdragon16888 发表于 2023-9-6 13:23:56

求一个用ssget遍历所有图元,统计带扩展属性数据的图元数量

(defun c:test ()
(setq ents (entget (car (entsel "\n请选择一个图元或输入回车键结束选择: "))(list "*")))
(print ents)
)
以上测试时,确实能找到扩展数据
但是改用ssget就只能得到普通数据,扩展属性数据没有了,为什么?
求一个用ssget遍历所有图元,统计带扩展属性数据的图元数量

xj6019 发表于 2023-9-6 13:23:57

(defun C:NM ( / )
        (setq ss (ssget "x"(list (cons -3 (list '("*"))))))
        (sssetfirst nil ss)
)

netdragon16888 发表于 2023-9-8 22:47:51

xj6019 发表于 2023-9-6 13:38
(defun C:NM ( / )
        (setq ss (ssget "x"(list (cons -3 (list '("*"))))))
        (sssetfirst nil ss)


抱歉,回晚了!谢谢你的答案
页: [1]
查看完整版本: 求一个用ssget遍历所有图元,统计带扩展属性数据的图元数量