[求助]：如何实现在cad中统计块的数量？谢谢了》。

dlxx · 发表于 2003-12-16 14:18:00

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

谢谢了》。

nuance · 发表于 2003-12-16 14:20:12

FILTER--BLOCK NAME

coolzhb · 发表于 2003-12-16 15:22:23

试试我的文字修改大师中的图块统计！

lsjjm · 发表于 2003-12-16 15:45:18

试试下面的程序!
(defun c:test (/ b tl)
(vl-load-com)
(vlax-for b (vla-get-blocks
(vla-get-ActiveDocument
(vlax-get-acad-object)))
(if (= (vla-get-islayout b) :vlax-false)
(setq tl (cons (vla-get-name b) tl))
)
)
(reverse tl)
(setq pt (getpoint "Pick Point: "))
(foreach item tl
(setq ss (ssget "x" (list (cons 2 item))))
(vl-cmdf "text" pt 0.1 0 item "")
(vl-cmdf "text" (polar pt 0 2) 0.1 0 (sslength ss) "")
(setq pt (polar pt (* 1.5 pi) 0.15))
)
)

myfreemind · 发表于 2003-12-16 18:29:34

试试这个程序！
http://www.xdcad.net/forum/showthread.php?s=&threadid=123251

chhm · 发表于 2004-1-7 15:47:00

可以使用count.lsp，一切ok。

账号		自动登录	找回密码
密码			立即注册

[求助]：如何实现在cad中统计块的数量？谢谢了》。

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子