[求助]：图块统计：我的一张图中有许多图块，如何自动统计数量呢？

albertzhou · 发表于 2004-6-1 22:58:57

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

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

×

我的一张图中有许多图块，如何自动统计数量呢？

lsjjm · 发表于 2004-6-2 05:24:40

为何不搜索一下论坛呢? 有许多块统计的贴子!
请参考:
(defun c:test ()
  (vl-load-com)
  (setq p0 (getpoint "\nInput Insert Point: "))
  (vl-cmdf "text" p0 0.08 0 "Block             Quantity")
  (setq p0 (polar p0 (* 1.5 pi) 0.12))
  (vl-cmdf "text" p0  0.08 0 "*******************************")
  (setq doc (vla-get-ActiveDocument (vlax-get-acad-object)))
  (vlax-for blk (vla-get-blocks doc)
(if (= (vla-get-islayout blk) :vlax-false)
   (progn
      (setq p0 (polar p0 (* 1.5 pi) 0.12))
      (vl-cmdf "text" p0 0.08 0 (vla-get-name blk))
      (vl-cmdf "text" "j" "r" "@2,0" 0.08 0 (itoa (vla-get-count blk)))
   )
)
  )
)

冲撞 · 发表于 2004-6-2 08:32:18

学习学习~~~~~~~~~~~

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

[求助]：图块统计：我的一张图中有许多图块，如何自动统计数量呢？

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

相关帖子