1. CAD如何才能分解一个多重插入的无名块
以下代码来自于网络:
(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))
(setq r_dist_zm44 (assoc 44 e))
(setq c_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 (subst (cons 71 0) c_zm71 e))
(setq e (subst (list 100"AcDbBlockReference") (list 100"AcDbMInsertBlock") e))
(entmake e)
(entdel stm)
))
(SETQ STM (car (ENTSEL "\n点取下一多重块")))
)
(setvar "cmdecho" 1)
)
将上面的代码复制,粘贴到文本编辑器里面,保存为后缀名为.lsp格式的,在cad工具-加载应用程序,找到你保存的这个文件,输入exm,然后就选择两此不能分解的多重块,就变成可以分解的普通块了。
祝你生活愉快。。。
2. CAD的多重插入块如何分解别人发给我一个图,无法炸开,X命令没用啊
把以下内容保存为lsp文件(如exm.lsp),加载后运行exm既可把“多重插入块”转换为“普通块”,然后既可用“explode”分解。
如果不懂把图纸发给我:[email protected]
;;-------------------------------------------------------------
;;转换“多重插入块”为“普通块”。
(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))
(setq r_dist_zm44 (assoc 44 e))
(setq c_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 (subst (cons 71 0) c_zm71 e))
(setq e (subst (list 100"AcDbBlockReference") (list 100"AcDbMInsertBlock") e))
(entmake e)
(entdel stm)
))
(SETQ STM (car (ENTSEL "\n点取下一多重块")))
)
(setvar "cmdecho" 1)
)
3. cad里的多重插入块怎么分解
1、将以下程序复制到TXT文件中并将其另存为exm.lsp文件。
程序如下:
;; ------------------------------------------------ -------------
;;将“多个插入块”转换为“正常块”。
(DEFUN C:exm()
(setvar“cmdecho”0)
(SETQ STM(汽车(ENTSEL“ n点多块”)))
(而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))
(setq r_dist_zm44(assoc 44 e))
(setq c_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(subst(cons 71 0)c_zm71 e))
(setq e(subst(list 100“AcDbBlockReference”)(list 100“AcDbMInsertBlock”)e))
(entmake e)
(entdel stm)
))
(SETQ STM(汽车(ENTSEL“ n指向下一个多个街区”)))
)
(setvar“cmdecho”1)
)
4. 如何分解用多重插入块加密的CAD图纸
方法1:在属性框中将行列数设置为1,然后图块就可以炸开了,如下图所示。 方法2:先在属性框中看一下并记住此图块的名称,然后直接将此图块删除,重新用I(插入)命令插入一个此图块,直接将插入的图块炸开即可。 假设在属性框中看到图块的名称带星(*)号,那这种图块通常是用程序生成的匿名块,这种图块无法再插入,即使将行列数改成1,也是无法炸开的,如下图所示。 遇到这种情况怎么办呢?方法也有两种: 方法1:将图形输出成矢量格式的其他图形,然后再导入,例如打印成PLT,再导入PLT文件,或者输出成WMF(WMFOUT),再输入成WMF文件(WMFIN),然后炸开。 这种方式虽然适用于各种情况的图形,但由于这些文件格式支持的图形类型比较少,因此标注、文字等图形都会被打散,会给后面的编辑带来很多麻烦,显然不是大家希望使用的方法。 方法2:用插件,网上有专门对付这种图块的插件,叫做LOCKDWG.VLX,在此处分享给大家,使用方法如下: 1、输入AP命令,打开加载对话框,加载lockdwg.vlx。 2、输入unlockdwg命令,回车,会确认是否已备份文件,输入Y后回车,你的图纸就会被炸开了。 下载地址: 我试过这个插件是可用的,但是不是能分解所有类似的匿名的多重插入块我就不知道了。 当然,之所以有人用多重插入块和匿名块的形式来处理图纸,就是希望图纸发给其他人后,其他人可以看、可以打印,但不能被修改和编辑。所以是同事或朋友发给我们这样的图纸,最好不要去处理,如果非要用这张图,可以向同事或朋友要原图。
5. CAD中多重插入块怎么分解啊
选中那个图块,然后再用X,就可以了。
6. CAD图为多重插入引用时能分解吗,怎样分解
CAD图为多重插入引用时能分解的代码:
(defun c:unlk (/ en ent)
(setq en (entsel " 请选择被加密的图形:"))
(if en
(if (= (cdr (assoc 0 (setq ent (cdr (entget (setq en (car en)))))))
"INSERT"
)
(progn
(setq ent (entmakex
(list '(0 . "INSERT")
(assoc 2 ent)
(assoc 10 ent)
)
)
)
(command "_.explode" (entlast))
(entdel en)
)
)
)
(princ " OK,解密成功。")
(princ)
)
保存为“unlk.lsp”文件。
(6)多重插入块cad怎样分解扩展阅读:
平面绘图:能以多种方式创建直线、圆、椭圆、圆环多边形(正多边形)、样条曲线等基本图形对象。
绘图辅助工具:提供了正交、对象捕捉、极轴追踪、捕捉追踪等绘图辅助工具。正交功能使用户可以很方便地绘制水平、竖直直线,对象捕捉可 帮助拾取几何对象上的特殊点,而追踪功能使画斜线及沿不同方向定位点变得更加容易。
编辑图形:CAD具有强大的编辑功能,可以移动、复制、旋转、阵列、拉伸、延长、修剪、缩放对象等。
标注尺寸:可以创建多种类型尺寸,标注外观可以自行设定。
书写文字:能轻易在图形的任何位置、沿任何方向书写文字,可设定文字字体、倾斜角度及宽度缩放比例等属性。
图层管理功能:图形对象都位于某一图层上,可设定对象颜色、线型、线宽等特性。
三维绘图:可创建3D实体及表面模型,能对实体本身进行编辑。
网络功能:可将图形在网络上发布,或是通过网络访问AutoCAD资源。
数据交换 :提供了多种图形图像数据交换格式及相应命令。
二维转三维
solprof 命令:在图纸空间中创建三维实体的轮廓图像。
solview 命令:使用正交投影法创建布局视口以生成三维实体及体对象的多面视图与剖视图。
soldraw 命令:在用 solview 命令创建的视口中生成轮廓图和剖视图。
soldraw 命令与 solprof 命令的使用方法及区别:
soldraw 命令需与 solview 命令配合使用,只能在用 solview 命令创建的视口中生成轮廓图和剖视图。
solprof 命令可以单独使用,即在图纸空间中的任何视图上都可以使用,可以创建三维实体的轮廓图像。
7. CAD多重插入块怎么打散
1、网络搜索下载专用的分解工具来炸开。(此方法最好)
2、点击这个多重引用,看它的名字,然后再用minsert命令,插入这个名字,只不过都按默认的行数(1行)列数一直回车。这样插入的这个块就可以炸开了。
3、双击这个块,出现参照编辑对话框,点确定,出现参照编辑工具条;用explode炸开;然后点击参照编辑工具条从工作集删除对象,选中所有图形,回车;再点击参照编辑工具条上的放弃对参照的修改。此时再用explode就可以炸开了。
4、(1)、打开原文件后,输出为*.wmf文件, (2)、新建空*.DWG文件,插入*.wmf文件, (3)、输入另外一个炸开命令:xplode回车 ,(4)、选图层(TA)。
5、(1)、在任何版本中打开图件(只要能打的开就行) (2)、选中图,打开属性对话框,将行和列均改为1。(3)、另存为R14以下(包括R14)版本格式。 (4)、打开R14,打开刚才另存的图,保存。(记住,这步尤其重要,必须是R14不能是cad2002及以上版本)
8. CAD的多重插入块如何分解最好是简单的方法,插件也可以 求解救
网上搜索lockdwg.VLX插件,
使用方法:
打开CAD,“工具”菜单里“加载应用程序”弹出对话框,找到、加载lockdwg.VLX文件。遇到“多重插入引用”问题,用unlockdwg命令,单击块 ,回车,就OK了.
我就是用这个插件解决了问题。
9. 多重插入块的CAD图 怎么分解
把以下内容保存为lsp文件(如exm.lsp),加载后运行exm既可把“多重插入块”转换为“普通块”,然后既可用“explode”分解。如有不懂加QQ:1025344364 ;;------------------------------------------------------------- ;;转换“多重插入块”为“普通块”。 (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)) (setq r_dist_zm44 (assoc 44 e)) (setq c_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 (subst (cons 71 0) c_zm71 e)) (setq e (subst (list 100"AcDbBlockReference") (list 100"AcDbMInsertBlock") e)) (entmake e) (entdel stm) )) (SETQ STM (car (ENTSEL "\n点取下一多重块"))) ) (setvar "cmdecho" 1) )
满意请采纳
10. cad多重插入块怎么分解
点选多重块,然后打散,多次打散就可以
如果图块有写lisp保护的话,那就需要高手帮忙了。