几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量

几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量 (http://www.dimcax.com/hust/index.php)
-   ObjectARX(AutoLISP) (http://www.dimcax.com/hust/forumdisplay.php?f=178)
-   -   [求助]请教高手,如何判断所框选的图块中哪些是匿名图块或多重图块。 (http://www.dimcax.com/hust/showthread.php?t=11293)

yang686526 2009-04-26 02:35 PM

[求助]请教高手,如何判断所框选的图块中哪些是匿名图块或多重图块。
 
[求助]请教高手,如何判断所框选的图块中哪些是匿名图块或多重图块。
www.dimcax.com
[求助]请教高手,如何判断所框选的图块中哪些是匿名图块或多重图块。
[求助]请教高手,如何判断所框选的图块中哪些是匿名图块或多重图块。
并对这些图块转换成普通图块?
我这有一个,但只能点选:
;;匿名图块转一般图块
(defun c:nm (/ a blk obj)
(zhl_registry)(setq obj (vlax-ename->vla-object (car (entsel))))
(setq
blk (vla-item (vla-get-blocks
(vla-get-activedocument (vlax-get-acad-object))
)
(vla-get-name obj)
)
)
(vla-put-name blk (setq a (rtos (* (getvar "cdate") 1e8))))
(vla-auditinfo
(vla-get-activedocument (vlax-get-acad-object))
:vlax-true
)
(vla-put-name blk a)
(princ)
)
d
匿名块只要判断块名是不是“*”开头就知道了
对于多重块用 vla-get-objectname 判断
d
高手,caoyin,能否出招?
可不可以把上面这个程序改一下,做成:
可以框选炸开多重无名块的?
d
提示:
多重块不是炸开的,
——》获取块名,
——》(entmake '((0 . "insert") (... 重新创建insert对象
——》explode
d


所有的时间均为北京时间。 现在的时间是 08:01 AM.