【Gu_xl】Lisp程序设计错误处理的技巧

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) 解决

账号		自动登录	找回密码
密码			注册

[【Gu_xl】] 【Gu_xl】Lisp程序设计错误处理的技巧