alanjt 发表于 2022-7-6 07:31:23

如果要从预定义层列表中进行选择,可以从列表框中进行选择。
如。
 
(defun c:MKLayer(/layers data)(setq layers’((“SAMPLE”001 SAMPLE Project-“140”Continuous”)(“CURRENT”002 CURRENT Project-“4”Continuous”)(“TEST”003测试系统-“4”Continuous”))(cond)((not(setq data(cdr)(assoc(car)(AT:ListSelect“选择层过滤器名称以创建层”)“20 15”假“(vl排序(mapcar‘car layers)”
页: 1 [2]
查看完整版本: 用于层创建的Lisp