绑定参照 如何让含有某个关键字的参照不绑定

江南十笑

下面是一次绑定所有参照的LISP 现在想改成 含有有  “电子签名”  这四个字的参照文件名  不绑定  其他的绑定    如何修改

1. ;绑定所有外部参照
   
2. (defun c:tt()
   
3.   (setvar "BINDTYPE" 1)
   
4.   (command "-xref" "B" "*")
   
5.   (setvar "BINDTYPE" 0)
   
6. )

;绑定所有外部参照<br /> (defun c:tt()<br />   (setvar "BINDTYPE" 1)<br />   (command "-xref" "B" "*")<br />   (setvar "BINDTYPE" 0)<br /> )

jun353835273

vla的方式去判断块名后在绑定vla-bind

command绑定是眉毛胡子一把抓

江南十笑

jun353835273 发表于 2020-4-25 22:44
vla的方式去判断块名后在绑定vla-bind

command绑定是眉毛胡子一把抓

不会
vla函数

李钊伟2012

这个很简单啊，只需要加两行代码

江南十笑

李钊伟2012 发表于 2020-4-29 13:31
这个很简单啊，只需要加两行代码

额 什么代码           

ljm1222

不用代码 先拆离带签名的 再全绑定

2. (defun c:tt()
   
3.   (command "-xref" "D" "*电子签名*")
   
4.   (command "-xref" "B" "*")
   
5. )
   

(defun c:tt()<br />   (command "-xref" "D" "*电子签名*")<br />   (command "-xref" "B" "*")<br /> )<br />