[求助]：请高手指教，已解决，非常感谢！

bolixin · 发表于 2006-2-28 17:01:03

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

(defun c:abc ()
  (setq TextStr (getstring "\n请输入编号:"))
  (setq ss (ssget "X" '((0 . "TEXT") (1 . TextStr))))
  (setq cont (rtos (sslength ss) 5 0))
  (princ (strcat "共" cont "个"  TextStr))
  (princ)
)

请问：
1、(setq ss (ssget "X" '((0 . "TEXT") (1 . "YAZ1"))))运行正常，但(setq ss (ssget "X" '((0 . "TEXT") (1 . TextStr)))) 运行错误。请问怎么解决？
2、如何实现选择集ss的亮显或变色？
请高手指教，谢谢！

lazybug · 发表于 2006-2-28 17:24:46

1. 我也碰到过，我是用循环语句自己判断的后一个条件
2.（redraw en_name 3)

snoopychen · 发表于 2006-2-28 17:36:09

其中一句改成这样

(setq ss (ssget "X" (list (cons 0 "text") (cons 1 textstr))))

这种带'的表最好里面没有变量，比如textstr这个变量

bolixin · 发表于 2006-2-28 18:15:46

解决了，非常感谢各位！！！

账号		自动登录	找回密码
密码			立即注册

[已解决] [求助]：请高手指教，已解决，非常感谢！

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子