怎样让一个选择集中的对象达到像鼠标框选后产生的效果一样？

yinheng

怎样让一个选择集中的对象达到像鼠标框选后产生的效果一样？

meflying

(ssget)

xyp1964

2. (defun test (ss)
3.    (setq  i -1)
4.    (repeat (sslength ss)
5.        (setq i (+ 1 i))
6.        (redraw (ssname ss i) 3)
7.    )
8.    (princ)
9. )

(defun test (ss)    (setq  i -1)    (repeat (sslength ss)        (setq i (+ 1 i))        (redraw (ssname ss i) 3)    )    (princ) )