ssgetfirst显示问题

且听风吟09

看一组代码
(defun c:tt()
  (setq ss (ssget))
  (sssetfirst nil ss)
  )

这个函数，在初始状态没有选择的情况下，运行后会夹点显示选中对象
但是如果初始状态已经选中几个对象，运行后选中状态消失，鼠标点击任意位置才会显示
这是为什么呢，求大神们答疑解惑

newer

那就先把亮显的关闭，然后在执行你的

1. (defun c:tt()  (setq oldvar (getvar "pickfirst"))
   
2.   (setvar "pickfirst" 1)
   
3.   (command "select" "")
   
4.   (setvar "pickfirst" oldvar)
   
5.   (setq ss (ssget))
   
6.   (sssetfirst nil ss)
   
7. )
   
8. 
   

(defun c:tt()  (setq oldvar (getvar "pickfirst"))<br />   (setvar "pickfirst" 1)<br />   (command "select" "")<br />   (setvar "pickfirst" oldvar)<br />   (setq ss (ssget))<br />   (sssetfirst nil ss)<br /> )<br /> <br />