[求助]：求助各位版主，大虾

flyingfish

在一张图插入同一名称块，如何统计其数量。

心梦相随

可以用(setq s (ssget '((2 . en)) ))，其中en为你的图块名称，可以用通配符，然后再(sslength s )就可以了。

flyingfish

谢谢大虾的回复。可是小弟没有成功还望指点。我是这样做的：
在aracd.lsp中（setq s (ssget'((2.#)) ))
                   (sslengt）
然后，在cad图中输入什么命令统计呀？
应该怎样，通配符用什么表示，请告之，谢谢。

心梦相随

谢谢斑竹...
flyingfish朋友，由于我的机子没办法上传,我在这里直接写了一段,你校验一下看能否用，若不行,我回去校验了,再往你的信箱发把。 通配符可以查看CAD的帮助wcmatch或这里吧.

2. 
   
3. (defun c:xdcad( / s e txt)
   
4.   (setq txt (getstring T "\n输入你要的图块名称:"))
   
5.   (setq e (list (cons 2 txt)))
   
6.   (setq s (ssget e))
   
7.   (princ "\n图块 ") (princ txt) (princ " 数量为:")
   
8.   (princ (sslength s))
   
9. (princ)
   
10. )

<br /> (defun c:xdcad( / s e txt)<br />   (setq txt (getstring T "\n输入你要的图块名称:"))<br />   (setq e (list (cons 2 txt)))<br />   (setq s (ssget e))<br />   (princ "\n图块 ") (princ txt) (princ " 数量为:")<br />   (princ (sslength s))<br /> (princ)<br /> )

加载后，输入xdcad就可以了.

eachy

最初由 flyingfish 发布
[B]在一张图插入同一名称块，如何统计其数量。 [/B]

晓东工具箱－》图块－》统计图块。
另：(princ "\n图块 ") (princ txt) (princ " 数量为:")
用一个princ即可(princ (strcat "\n图块 " txt " 数量为:"))

xjiansh

在插入图块的时候放在一层中，然后用天正中的图元过滤选中所要统计的块，然后用list输入p，就可以看见刚才选中的有几个图块了。

flyingfish

多谢各位大虾热心相助，多谢。

xjiansh

这里就是交流和提高的地方，以后要是有懂的问题，也热心的帮助别人吧！众人拾柴火焰高......