在使用CAD的时候大家可能会遇到 图纸里面的内容想要修改,可以是改不了,在特性中看到这是个多重插入块,直接分解,也分解不了,这时候如何炸开cad图纸里的多重插入块呢?下面进行解答。
材料/工具
CAD
方法
新建一个【文本文件】,打开【文件】,粘贴以下内容;
;;——-360新知——————————————————
;;转换“多重插入块”为“普通块”。
(DEFUN C:exm()
(setvar’cmdecho’ 0)
(SETQ STM (car(ENTSEL ‘\n点取多重块’)))
(while stm
(setq e(entget stm))
(setq stlx(cdr (assoc 0 e)))
(if (= stlx’INSERT’)
(PROGN
(setq r_zm70(assoc 70 e))
(setq c_zm71(assoc 71 e))
(setqr_dist_zm44 (assoc 44 e))
(setqc_dist_zm45 (assoc 45 e))
(setq e (subst(cons 44 0) r_dist_zm44 e))
(setq e (subst(cons 45 0) c_dist_zm45 e))
(setq e (subst(cons 70 0) r_zm70 e))
(setq e (s仅航确乙之照ubst(cons 71 0) c_zm71 e))
(setq e (subst顺劳改件(list 100’AcD使任bBlockReference’) (list 100’AcDbMInsertBlock’)e))
(entmake e)
(entdel stm)
))
(SETQ STM (car(ENTSEL ‘\n速特期成点取下一多重块’)))
)
(setvar’cmdecho’ 1)
)
【保存】并【关闭】文件,重命名为【exm.lsp】文件;
(如果图标还是文本的图标,说明扩展名没有改变,需要把隐藏的扩展名显示出来,再改)。
打开【CAD】软件,点菜单【工具】底部的【AutoLISP】中的【加载应用程序】。
在打开的界面中,找到刚才改名的【exm.lsp】文件,点【加载】,在界面左下角显示成功加载,点【关闭】。
在【命令行】输入【exm】按【回车键】。
命令行提示【点取多重块】,此时在图上点击这个不能分解的多重块,鼠标【右键】或按【回车键】。
这样就可以将多重块转变为普通的块。
点击右侧【分解】,用分解命令将块分解即可。
结束操作,此时就可以对图纸进行修改了。
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容, 请发送邮件至 951076433@qq.com 举报,一经查实,本站将立刻删除。如若转载,请注明出处:https://www.kaofuzi.com/244449.html