请教！如何屏蔽CAD自带命令的错误提示

xiaocainiao

2. (defun c:tt ()
   
3.   (setq en (car(entsel)))
   
4.   (setq pt (getpoint))
   
5.   (command-s "break" en "F" pt "@")
   
6. )
   

(defun c:tt ()<br />   (setq en (car(entsel)))<br />   (setq pt (getpoint))<br />   (command-s "break" en "F" pt "@")<br /> )<br />

执行上方代码以后、命令行会有"点无效"的提示、
我用(setvar "cmdecho" 0)这个无法屏蔽这个错误提示、
所以请教一下大家！
有没有其他变量可以屏蔽掉这个错误提示

xiaocainiao

ljpnb 发表于 2024-7-9 09:54
(command  "break"  (entsel)  "F" (getpoint) "@")
或是(command "break" pause "f" pause "@")
不过注 ...

谢谢！我用的(vl-cmdf "._break" en "_non" pt "_non" pt) 这种形式就好了

ljpnb

(command  "break"  (entsel)  "F" (getpoint) "@")
或是(command "break" pause "f" pause "@")
不过注意捕捉点的设置

xiaocainiao

你有种再说一遍 发表于 2024-7-9 08:10
根本不需要屏蔽,错误就是用来看的,if绕过错误参数才是关键

嗯嗯  搞出来了、换种执行模式就行了

gzcsun

好像这类命令的提示是没法屏蔽，一出错就会提示。

我比太阳还要晒

可以用出错跳过试试  vl-catch-all-apply

xiaocainiao

我比太阳还要晒 发表于 2024-7-8 23:31
可以用出错跳过试试  vl-catch-all-apply

谢谢、我试了一下貌似不太行

你有种再说一遍

根本不需要屏蔽,错误就是用来看的,if绕过错误参数才是关键

MZ_li

xiaocainiao 发表于 2024-7-9 08:17
嗯嗯  搞出来了、换种执行模式就行了

怎么搞出来的？

xiaocainiao

MZ_li 发表于 2024-7-9 09:19
怎么搞出来的？

(vl-cmdf "._break" en "_non" pt "_non" pt) 换成这种的了