写的很好,谢谢G版
很好!研究一下了!
可以整理一下下载吗?复制好多少了括号
本帖最后由 xxyyzzlg 于 2024-8-22 16:10 编辑
感谢楼主的精心梳理和热心分享。在使用中发现用下面的函数能正确处理错误,恢复系统变量。
(Gxl-ErrStaSys '("cmdecho" 0 "orthomode" 0 "cecolor" "256" "celtype" "bylayer" "clayer""构造线层"))
但若是将某个系统变量对应的值,改用赋值后的变量名,则失败。比如:
(setq envName (getenv "Ager1")) ;确定该环境变量的值为 "构造线层"
(Gxl-ErrStaSys '("cmdecho" 0 "orthomode" 0 "cecolor" "256" "celtype" "bylayer" "clayer" envName ))
** Error: 参数值错误: AutoCAD 变量值: ENVNAME **
而在命令行里用(setvar "clayer" envname) 是成功的。
搞不清是我用的方法不对,还是这个函数不支持这种用法了。
已用 (mapcar 'eval lst) 解决
谢谢大师分享