laiz3000 发表于 2012-4-18 09:32:04

感谢分享,学习

jfxia 发表于 2012-4-23 10:44:40

   明白了,很有用

andyhua 发表于 2012-4-23 11:42:55

谢谢楼主的帖子,收藏了!

cabinsummer 发表于 2012-4-23 12:15:18

建议加精华

lgttblue 发表于 2012-5-21 21:46:32

顶下楼主

smartstar 发表于 2012-5-22 09:06:14

谢谢,讲解的很透彻。

greatvictory 发表于 2012-5-22 09:21:49

本帖最后由 greatvictory 于 2012-5-22 09:32 编辑

曾经有位高手教过我这样的办法

(setq v1 (getvar "cmdecho"))
(setq v2 (getvar "blipmode"))
(setq v3 (getvar "osmode"))
(setvar "cmdecho" 0)
(setvar "blipmode" 0)
(setvar "osmode" 0)
(if (vl-catch-all-error-p (vl-catch-all-apply '(lambda ()
      (此处添加主程序)
)))
(progn
    (setvar "cmdecho" v1)      ;;;还原系统变量
    (setvar "blipmode" v2)
    (setvar "osmode" v3)
    (princ)
)
)

sfzyr 发表于 2012-5-22 14:03:52

初學者往往把握不住這個處理!

fish1121 发表于 2012-5-22 15:01:31

楼主喜欢钻研的精神,值得我们去学习

qq229918602 发表于 2012-5-22 23:13:55

希望能有更多的函数解释。。。
页: 1 2 [3] 4 5 6 7
查看完整版本: Lisp中一个常用函数(*error*)的介绍