lisp语言如何设置CAD当前绘图颜色
展开全部
(setq #os6 (getvar "Cecolor") ;;取得当前颜色为#os6
(setvar "cecolor" "1");改变当前颜色为【红】，颜色的数值到AutoCAD里面查看。
(setvar "Cecolor" #os6);颜色还原
;1.以上是一个设置方法，这个时候绘图的话，会把图形以设置颜色绘制。
;2.如果图元对象已经绘制，要修改图元颜色的话，这个图元是ent 【如：(setq ent (entlast))】
(command "_.chprop" ent "" "color" 1 "");修改图元颜色为【红】；这个是直接改变颜色
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
