ddvcx 发表于 2023-7-28 09:01:09

ssyfeng 发表于 2023-7-28 08:40
再试试这个：
(defun c:tt (/ lay0 lst mergelayers)
        (defun mergelayers (match to / lst def lay)


谢谢，这个运行没问题

xyp1964 发表于 2023-7-28 18:47:04

ddvcx 发表于 2023-7-28 08:34
谢谢回复，这个参数变多之后还是会有目标图层被选择的问题，这是测试dwg：




strcase 误写成了 strcat，修改代码见7楼

ddvcx 发表于 2023-7-29 14:49:35

xyp1964 发表于 2023-7-28 18:47
strcase 误写成了 strcat，修改代码见7楼

谢谢，测试没有问题
页: 1 [2]
查看完整版本: 请求完善自动合并图层程序