（更新）[原创]：“图层大挪移”V2.3

eachy

1. 
   
2. V2.3 2004.10.29更新，推荐使用
   

复制代码

wkai

建议增加一个预览功能。
按预览则单独把 合并层和被合并层打开 其他层关闭，便于察看 确认.

wkai

v1.1感觉挺好的

1 建议双击图层列表中的项目自动预览
2 如果选择了几个图层进行预览，返回对话框，能够自动恢复对预览图层的选择。

eachy

最初由 wkai 发布
[B]v1.1感觉挺好的

1 建议双击图层列表中的项目自动预览
2 如果选择了几个图层进行预览，返回对话框，能够自动恢复对预览图层的选择。 [/B]

1 帮助中这样说

回调原因指出了动作发生的原因，并返回到 $reason 变量中。它为任一种动作都设置了值，但只有当动作与 edit_box、
list_box、image_button 或 slider 控件相关时，才需要对它进行检验。下表列出了所有可能的值：

回调原因代码

代码        说明
1        这是大多数动作控件的值，用户已选定该控件（可能按 ENTER 键，该控件是缺省控件且操作平台接受加速键）。
2        编辑框：用户已退出编辑框，但尚未作最后选择。
3        滑块：用户通过拖动滑块改变了滑动条的值，但尚未作最后选择。
4        列表框和图像按钮：此回调原因总是跟随代码 1，它通常表示“转移到前一个选择上”。不应放弃上一个选择，这会使用户感到困惑。
代码 1 在表中给出了详细说明，代码 2、3 和 4 的详细文字说明请见表后。

代码 2 -- 编辑框

用户已经按 TAB 键或选择其他控件退出了编辑框，但尚未作最后选择。如果这是一个编辑框回调的原因，应用程序不应更新其相关变量的值，而应检查编辑框中的值的合法性。

代码 3 -- 滑块

用户通过拖动滑块（或等效操作）改变了滑动条的值，但尚未作最后选择。如果这是滑块回调的原因，应用程序不应更新其相关变量的值，而应更新显示滑块状态的文本。详细信息请参见滑块，代码样例请参见处理滑块。

代码 4 -- 列表框

用户双击列表框。可以在应用程序中定义双击的含义。如果对话框的主要目的是选择一个列表项，则双击应作出选择然后退出对话框（此时，list_box 控件的 is_default 属性应该是 true）。如果列表框不是对话框的主要控件，则双击应被看作是一个选择（代码 1）。
允许用户选择多个项目的列表框 (multiple_select = true) 不支持双击。

代码 4 -- 图像按钮

用户已双击图像按钮。可以在应用程序中定义双击的含义。在多数情况下，用单击来选择按钮就可以了。但在某些情况下，用单击（或键盘操作）亮显按钮，而用 ENTER 键或双击选择按钮会更合适一些。

lzy9788

eachy斑竹，在打开的CAD图中，lyrt.vlx是不是在一个图中只能加载一次，因为我自己做了个ACAD.LSP，我添加了(load "lyrt")，如果我启动CAD时加了一次，在作图中再用appload添加一次acad.lsp则提示lisp程序已加载.

wkai

最初由 eachy 发布
允许用户选择多个项目的列表框 (multiple_select = true) 不支持双击。

multiple_select = true的list_box也可以双击的。
选中多个项目后双击的话，只有双击的项目进入双击操作程序。
但是可以按着CTRL双击.

eachy

最初由 wkai 发布
[B]

multiple_select = true的list_box也可以双击的。
选中多个项目后双击的话，只有双击的项目?.. [/B]

已修改

to 六楼：

vlx 文件只可以加载一次，如果你用 acad.lsp 先行加载，再次用 appload 时应该先在列表中找到加载的文件，点击后选择旁边的卸载，完成后再加载新文件。

c52ljg

多谢了，刚才试用了一上觉得蛮好用！
提一个建议，不知道能否实现：
把预览做成一个实时预览，做成一个选项，由用户控制每增加一个合并图层就实时预览效果，还是最后再预览，或者选择一个图层就返回工作区用虚线显示这个图层上的所有实体，个人觉得合并前一个一个的查询实体所在图层不太流畅。

  ^_^    ^_^

wkai

eachy兄动作好快！

eachy

最初由 c52ljg 发布
[B]多谢了，刚才试用了一上觉得蛮好用！
提一个建议，不知道能否实现：
把预览做成一个实时预览，做成一个选项，由用户控制每增加一个合并图层就实时预览效果，还是最后再预览，或者选择一个图层就返回工作区用虚线显... [/B]

1 在列表框多选模式下实现实时预览，可能做不到
2 查询以后可能会改成选择，将选择的实体所在图层合并

海豚

使用了一下，挺好用的，解决了许多问题，但是比层迁移的命令有所不足的是在块中的图层是无法合并的。如附图中的楼梯及卫生间。必须炸开。期待查询后能直接加入选择。

eachy

程序本身考虑了图块内部的情况，请将不能合并的DWG附上，谢谢。

LUCAS

;;圖層顏色設定不應有BYLAYER OR BYBLOCK
;;圖層列表無排序
;;radio_button無保持先前數據
;;"確定"按鍵是否應改為"結束" or "退出"
;;考慮加入線型處理

eachy

最初由 LUCAS 发布
[B];;圖層顏色設定不應有BYLAYER OR BYBLOCK
;;圖層列表無排序
;;radio_button無保持先前數據
;;"確定"按鍵是否應改為"結束" or "退出"
;;考慮加入線型處理 [/B]

1 颜色设定调用的是color对话框，它带了Bylayer和Byblock，我也没办法
2 可以增加
3 下次改进
4  可以修改
5  线形怎么处理，保留原来的线形？

改成这样：

LUCAS

選了Bylayer和Byblock-------改為其他色
機械圖---线形&顏色保留比較好

弄個繁體版來玩玩好嗎?--------不然又要自己仿造-----很累!!!   8-(