xyz002 发表于 2023-2-28 11:25:07

写的很好,谢谢G版

guankuiwu 发表于 2023-3-1 08:40:51

很好!研究一下了!

wxa123wl 发表于 2024-2-22 17:07:25

可以整理一下下载吗?复制好多少了括号

xxyyzzlg 发表于 2024-8-22 15:33:13

本帖最后由 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) 是成功的。
搞不清是我用的方法不对,还是这个函数不支持这种用法了。

xxyyzzlg 发表于 2024-8-23 13:24:57

已用 (mapcar 'eval lst) 解决
页: 1 2 3 4 5 6 7 8 9 10 [11]
查看完整版本: 【Gu_xl】Lisp程序设计错误处理的技巧