kanweier 发表于 2004-3-5 09:09:00

统计某一个块的数量

各位高手，求教一个问题，如何统计某一个块的数量

BDYCAD 发表于 2004-3-5 09:27:00

(defun c:cks (/ a1 a2 a3 a4 a5 a6 a7 a8 a9)<BR>       (setq a1 (entsel "\nselect a bolck:"))<BR>       (if a1<BR>                       (progn<BR>       (setq a2 (car a1))<BR>       (setq a3 (entget a2))<BR>       (setq a4 (assoc 0 a3))<BR>       (setq a5 (cdr a4))<BR>       <BR>       (if (= a5 "INSERT")<BR>                       (progn<BR>                                       (setq a6 (assoc 2 a3))<BR>                                       (setq a7 (cdr a6))<BR>                                       (princ "\n选择要查所选块数的区域")<BR>       (setq a8 (ssget (list '(0 . "INSERT") a6)))       <BR>       (setq a9 (sslength a8))<BR>       (princ "\n选区内的块")                       <BR>       (princ a7)<BR>       (princ "数目为:")<BR>       (princ a9)<BR>       (princ)<BR>               )<BR>               (princ "\n选择的物体不是块!!!")<BR>               )<BR>               )<BR>               (princ "\n没有物体被选择!!!")<BR>               )<BR>                       (princ)<BR>               )<BR>

myfreemind 发表于 2004-3-5 23:57:00

更直接的，用quickselect

syb008 发表于 2004-3-6 13:26:00

用filter(过滤)也不错的

mikewolf2k 发表于 2004-3-6 18:42:00

myfreemind发表于2004-3-5 23:57:00static/image/common/back.gif更直接的，用quickselect

<BR>对,这样最简单,只要输入块的名称就可以选中所有的该名块,再看看显示选择了多少图元.

kanweier 发表于 2004-3-8 11:10:00

请问要怎么使用？
页: [1]
查看完整版本: 统计某一个块的数量