*pop-error-mode* (AutoLISP) 
结束上一次调用 或 的错误处理函数*push-error-using-command**push-error-using-stack* 支持的平台:Windows 和 Mac OS 签名(*pop-error-mode*) 没有参数。 返回值类型:T 返回值 。T 言论在将自定义处理程序函数替换为以前定义的处理程序后,应进行调用。*pop-error-mode**error**error* 注意:在处理程序中使用函数时,不需要此函数。command-s*error* 
例子下面的示例演示了该函数的用法。*pop-error-mode* (defun my_err (err_msg)
    (if (/= err_msg "Function cancelled")
      (prompt (strcat "\nError: " err_msg))
    )
    (command "._undo" "_e")
    (command "._U")
    (setq *error* olderr)
  (princ)
)
(defun myUtil (key / )
    (setq olderr *error*
          *error* my_err)
    (*push-error-using-command*)         ; Indicate use of the command function instead of command-s
                                         ; in a custom error handler
    (command "._undo" "_group")          ; The following will not be executed in this sample, but is good 
                                         ; framework for setting up your own error handlers
  
    (/ 1 0)                              ; Call a function with incorrect values to trigger the custom error handler
                                         ; Remove when setting up your code
   
    ;; Perform your tasks here
    (command "._undo" "_e")
    (setq *error* olderr)                ; Restore old *error* handler
    (*pop-error-mode*)                   ; End the use of *push-error-using-command*
)
加载示例代码后,在命令提示符下输入 (myutil “String”) 以输入错误处理程序。 相关概念 | 
|Archiver|CAD开发者社区
( 苏ICP备2022047690号-1   苏公网安备32011402011833)
GMT+8, 2025-11-4 14:04
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.