网站首页 美食营养 游戏数码 手工爱好 生活家居 健康养生 运动户外 职场理财 情感交际 母婴教育 时尚美容

cad LSP 快速创建新图层

时间:2024-10-11 19:05:19

1、(defun C:123() (princ "\n 创建“123”图层&孥恶膈茯quot;) ; if Layer "肛舀辨乔DIM" doesn't exist create it (if (= (tblsearch "Layer" "123") nil) (command "Layer" "new" "123" "color" "7" "123" "") ) (setvar "CLAYER" "123")

2、cad中运行上面的程序

3、图层中自动生成123 图层

© 五度知识库