weiqi 发表于 2013-5-13 00:19:36

关于模糊搜索的写法[已解决]

本帖最后由 weiqi 于 2013-5-13 00:45 编辑

这个程序，只能完全匹配 组码 1的
通匹 得怎么用？
就是例如我 选择了 第A个~~
其他 包含 有 “第A个”的都被选择起来了。


(defun c:x1()
(setq en (entsel))

(setq
      ss1 (ssget "x"
                   (list (cons 1 (cdr (assoc 1 (entget (car en))))) (cons 0 "TEXT"))
            )
      )
(sssetfirst nil ss1)
)




*已自己解决~~原来前后加*即可~~~在LIST里 也行~














weiqi 发表于 2013-5-13 00:42:49

(defun c:x2()
(setq en (entsel))

(setq
        ss1 (ssget "x"
                   (list (cons 1 (strcat "*" (cdr (assoc 1 (entget (car en)))) "*")) (cons 0 "TEXT"))
          )
      )
(sssetfirst nil ss1)
)
页: [1]
查看完整版本: 关于模糊搜索的写法[已解决]