如何不区分大小写？

pxt2001

(defun c:t ()
  (setq str "abc")
  (setq ss (ssget (list (cons 0 "TEXT")
   (cons 1 (strcat "*" str "*"))
    )
    )
  )
)
以上代码区分了大小写，如何不区分大小写？

pxt2001

多谢指点迷津，问题已经解决。

Gu_xl

(defun c:t ()
   (setq str "[aA][bB][cC]")
   (setq ss (ssget (list (cons 0 "TEXT")
    (cons 1 (strcat "*" str "*"))
     )
     )
   )
)

@辰雨@

学习了

pxt2001

(defun c:t ()
  (setq str (getstring "\n请输入字符串："))
  ;;(setq str "abc")
  (setq        ss (ssget (list        (cons 0 "TEXT")
                        (cons 1 (strcat "*" str "*"))
                  )
           )
  )
)
这种情况[不是特定的字符]如何处理？
ssget "x"，再过滤，图面上文字多的话很慢。

zyhandw

向G版学习了

Gu_xl

pxt2001 发表于 2012-11-17 14:18
(defun c:t ()
  (setq str (getstring "\n请输入字符串："))
  ;;(setq str "abc")

请看wcmatch函数帮助！里面有很详细的说明！