[求助]自动建立图层

zgzzsn

不如找一个现成的作模版

小毛草

;;;自动创建平面图层
(defun c:DDD ()
  (setvar "cmdecho" 0)
  (command "layer" "m" "A-FURN-家具" "c" "251" "" "")
  (command "layer" "m" "A-FURN-绘图层" "c" "2" "" "")
  (setvar "cmdecho" 1)
(princ)
)


用了这个命令，为什么多建了一个DEMO图层的？

DDD Switch to layer [Demo]

skg123

zhuquanmao 发表于 2006-9-21 23:04
请参考
;;; 自动建层的lisp(defun c:zdjc ()  (setvar "cmdecho" 0)  (command "layer" "m" "ZQM ...

这个方法不错，还可以把线型确定，请问怎么确定 线粗？

林小林子

线型粗细如何定义？