[编程申请]：懒人梦想之二：嵌套图块改层和复制嵌套块中的块

twtwvl

本人从事室内设计工作，工作中时常会积累一些图块，对图块的管理有两个头痛的问题，第一是通常很多块里面的图层乱七八糟，这样就对后续的整体文件的图层管理存在很大问题，那么我一般的思路是所有块里面的内容在0层上，然后再把块放在自己想要的图层上，这样文件管理起来很方便，但是如果每个块都去炸开重新归层再组块工作量就很巨大了，我就想能不能用LISP实现整体归嵌套块里的所有内容到0层（或其它层），如图所示，图中为一个常用的嵌套图块，其中二人沙是一个块，单人沙发又是一个块，然后茶几不是图块，几个图块嵌套成一个图块，我想在不炸开总图块的情况下一次性的将其中的所有嵌套内容归为0层（或其它层），天正6.5有一个图块改层的工具，但试了几次只能将没有嵌套的图中的茶几改为0层，对其中嵌套的二人沙发块和单人沙发块不能实现归层操作。第二个功能就是想复制嵌套块中的块，比如我只想将此块中的单人沙发块复制出来。我知道ET工具里面有一个工具复制嵌套块内容，但此工具只能一根线一根线的复制，不能一个块一个块的复制，很是郁闷。请求各位大侠一试，相信同仁们也会遇到这两个问题，个人认为这两个功能对图块操作很有用。另如果能将这两个功能的LISP直接写进点击图块的系统菜单右键就出现选项就更加完美。

panliang9

如果你想让块中的对象归到零层，用CAD自带的层工具“laymrg"，即可。不用将块炸开。

但不知道你用的是CAD的那一个版本，这个工具LAYMRG在07以前的版本都是放在EXPRESS TOOL工具中，在07版变成CAD内置。

这个命令事实上是合并图层命令，你可以把一张图里的所有的图层全都合并到零层中去，就实现了你的目的！

如果你想复制块里面的块，在现阶段没有LISP的情况下，仍然是07版的CAD比较方便，它有一个块编辑器（不是块的在位编辑），当你双击块以后进入块编辑器里面，在块编辑器里面，可以很方便的复制块，带基点复制块。

如果你使用块的在位编辑，复制块也应该说不难
1、切到你想要的那一层，你必须使用左右方向键就可以很方便的切到你要的那一层。这一点很关键。
2、使用COPY命令，将你想要复制的块COPY到你要的位置。
3、使用在位块编辑的移除块内对象命令将刚才COPY出的对象移除。

这样你就能得到块了。

我现在画图使用大量的块，这是近两年才尝试到他的好处，这是我的一个贴子，谈的就是这样的问题！

http://www.xdcad.net/forum/showthread.php?s=&threadid=651481

隐藏对象，很有用的，向你推荐：

http://www.xdcad.net/forum/showt ... 3283522#post3283522

这个贴子大侠们给了我很有用的变层的程序，你试试

http://www.xdcad.net/forum/showt ... 3271510#post3271510

只显示命令

http://www.xdcad.net/forum/showt ... 3277581#post3277581

做无名块的命令

http://www.xdcad.net/forum/showt ... 3231125#post3231125