如何判断某个命令已被占用

mcxiangxin

各位大哥:请教一下呀,用什么方法可以测试某个命令已经被占用.

比方说我想知道"cv"  是否为一个已存在的命令.用程序怎么来判断呢?

ZZXXQQ

(if (= (type "cv") 'SUBR)

 (princ "\n名称 cv 已被使用。")

 (princ "\n名称 cv 未被使用。")

)

(if (= (type "c:cv") 'SUBR)

 (princ "\n名称 c:cv 已被使用。")

 (princ "\n名称 c:cv 未被使用。")

)

carrot1983

错。。。

(type "c:cv") 永远等于STR

SUBR 还是 USUBR 呢?

英雄无敌

其实用(/= nil c:cv)应该也可以判断的吧

byghbcx

(car (atoms-family 1 '("cv")))

xyp1964

(null c:cv)

AMTONNY

太简单了,在CAD下输入此命令看有没有反应就知道了,还要开发什么东东,麻烦

mcxiangxin

果然是聪明,高手!