BenjaminXM 发表于 2015-9-19 18:24:10

你好，看了源代码后，有一些疑惑想请教一下：
1. 在出错处理这块， ;;出错处理
(defun *error*_New (msg)
    (setq *error* *error*_Old)
    (if (wcmatch (strcase msg t) "*break,*cancel*,*exit*,*取消*")
      (if (= (getvar "LOCALE") "CHS")
        (princ "\n用户按了<Esc>强制退出")
        (princ "\nYou cancelled The operation!")
      )
      (princ (strcat "\n" msg))
    )
    (vla-EndUndoMark                                                ;回退
      (vla-get-ActiveDocument (vlax-get-acad-object))
   )       
    (Restore_Locked_Layers Locks)
    (princ)
)
(setq *error*_Old *error*)                                        ;保存出错处理函数
(setq *error* *error*_New)

这里的*error*_New为什么没有带参数msg?
这里为什么要采用一个*error*_Old *error*_New？传递过程不太清楚，能否指导一下这样做的意义吗？

freeok 发表于 2015-9-21 23:16:17


留下脚印，以备查询

mikary 发表于 2016-1-15 10:49:56

试过了，很好用~~

dedocibal 发表于 2016-7-29 16:25:23

我的币啊，是不是该取消了

dedocibal 发表于 2016-7-29 16:26:32

我的币啊，是不是该取消了

ou67169488 发表于 2016-9-19 22:48:57

每次看到带有小数的尺寸，我的强迫症又犯了！

pusslica 发表于 2016-9-24 18:46:20

留下脚印，以备查询

yoyoho 发表于 2018-4-14 19:55:09

学习一下，谢谢！

一个半 发表于 2018-4-20 09:42:40

留个脚印，证明我来过

qincj0001 发表于 2018-6-13 17:56:02

学习学习，谢谢谢谢
页: 2 3 4 5 6 7 8 9 10 11 [12] 13 14 15 16 17 18 19
查看完整版本: 【飞鸟集】数据取整（更新至2020.10）