判断一个块是否能被炸开

Lisphk · 发表于 2017-6-18 13:56:24

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

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

×

(defun _i**plodable ( blockdef )
(or
(not (vlax-property-available-p blockdef 'explodable))
(eq :vlax-true (vla-get-explodable blockdef))
)
)

q3_2006 · 发表于 2017-6-18 14:52:05

我写个改不可炸开为可炸吧...
(setq obj
         (VL-CATCH-ALL-APPLY
            'vla-item
            (list (vla-get-blocks
                     (vla-get-ActiveDocument (vlax-get-acad-object))
                  )
                  (vla-get-name (vlax-ename->vla-object (car (entsel))))
            )
         )
      )
(vla-put-Explodable obj -1)

Lisphk · 发表于 2017-6-18 15:21:35

q3_2006 发表于 2017-6-18 14:52

能炸开不等比例的吗？
如果不能炸开不等比例的，那除了不等比例的，还有哪些不能炸开的？

q3_2006 · 发表于 2017-6-18 17:07:50

Lisphk 发表于 2017-6-18 15:21

理论上可以...找出全部嵌套块..全部改成可炸应该就能搞定

Lisphk · 发表于 2017-6-18 17:12:53

q3_2006 发表于 2017-6-18 17:07

那这样炸开都变成单位比例了吧，和原来的形状会不同

q3_2006 · 发表于 2017-6-18 18:14:19

Lisphk 发表于 2017-6-18 17:12

你试试呗..没试过..真说不好哈..

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

[每日一码] 判断一个块是否能被炸开

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