bingshuier 发表于 2014-7-20 11:15:11

怎么把一个图层里面的所有东西都移动到指定的图层呢？

本帖最后由 bingshuier 于 2014-7-20 11:44 编辑

(defun c:lpjzh() ;lpjzh=梁配筋转换
(setq hcl-lpj-h (ssget "x" (list (cons 8 "0"))));hcl-lpj-h=后处理-梁配筋-水平
(command "chprop" hcl-lpj-h "" "la" 0_MV "" "")
(princ)
)
写到这里就写不下去了？

Andyhon 发表于 2014-7-20 11:23:53

search CHPROP...

Sring 发表于 2014-7-20 17:49:34

(defun c:lpjzh ()                        ;lpjzh=梁配筋转换
(setq        hcl-lpj-h (ssget "x" (list (cons 8 "0")))
        0_MV          "图层2"
)                                        ;hcl-lpj-h=后处理-梁配筋-水平
(command "chprop" hcl-lpj-h "" "la" 0_MV "")
(princ)
)
页: [1]
查看完整版本: 怎么把一个图层里面的所有东西都移动到指定的图层呢？