*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-10-29 09:42
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.