源码，自用图层切换程序分享
[*](defun c:Q () (tucengqiehuan "0")) ;"text" 改为您需要的图层
[*](defun c:te () (tucengqiehuan "text")) ;"text" 改为您需要的图层
[*](defun c:di () (tucengqiehuan "dim"));"dim" 改为您需要的图层
[*](defun c:be () (tucengqiehuan "bend"))
[*](defun c:ce () (tucengqiehuan "center"))
GIF动画是 AUTO cad2020测试，用的command-s运行的，低版本需要改为command使用
[*](command-s "_change" s-ent "" "p" "lt" "bylayer" "c" "bylayer" "la" tucengming "" )。
[*]浩辰2021中望2020测试OK需改command-s为command。
huxu823 发表于 2024-4-25 11:19
再或者根据选择所有对象包括"LINE" "ARC" "CIRCLE" "SPLINE" "ELLIPSE"的时候，但是他们使用的线型却不同， ...
这个是根据你选择的对象切换到对应图层，我附件程序有个是选择9号颜色转到BEN层的，可以参考一下， (ssget '((0 . "CIRCLE"))) 可以选择圆孔，然后输入切换图层命令，就切换到改图层可， ssget 使用方法可以搜一下ssget的帖子，有个大佬描述的非常详细。 再或者根据选择所有对象包括"LINE" "ARC" "CIRCLE" "SPLINE" "ELLIPSE"的时候，但是他们使用的线型却不同，有的使用"CENTER"线型，有的使用"DASHED"，有的使用"FENCELINE1"线型，又有的使用"PHANTOM"线型，该如何根据线型的区别，把这些对象归至对应的图层呢？ 如果要根据不同的对象类型（不只针对直线）改为对应的图层该怎么修改代码，比如要将："DEMENSION" "LEADER"对象改至"dim"图层，应该怎么修改代码？ 感谢分享。 谢谢分享谢谢分享谢谢分享 本帖最后由 w090212y 于 2024-4-21 11:10 编辑
自己搞得一个刷图层的 很不错。谢谢分享 感谢大佬分享 感谢分享~学习了~
页:
[1]
2