SSFirst does not Highlight and Grip selection ?!

[chavlji]

The following code is suppose to

1.) Ask for random user selection

2.) and then select (Highlight and Grip) all Blocks in the drawing:

 

(defun C:SelectB()
(setq SS (ssget ":S")
(SSSetFirst nil (ssget "X" (list (cons 410 (getvar "CTab")) (cons 0 "INSERT)  ) ))

Here is the BUG I get:

If nothing is selected before calling SelectB, it asks for selection and then selects (highlight and grip) all blocks in the drawing.

But if something is selected before calling it then it does not ask user to select (it is normal) BUT it also does not highlight and grip new selections (all blocks).

All blocks still are selected, they are just not highlighted and gripped - if i then call MOVE it starts with moving all the blocks. But it is not highlighted. WHY ?!

 

*It is a part of larger program so I know the upper example does not make a useful sense...

[Lee Mac]

Hmmm... I think you may need to turn off any previous grips before using the sssetfirst, try this maybe:

 

(defun C:SelectB()
(setq SS (ssget ":S")
(sssetfirst nil nil)
(SSSetFirst nil (ssget "X" (list (cons 410 (getvar "CTab")) (cons 0 "INSERT))))

[Lee Mac]

As it happens, I had similar problems a while back

 

http://www.cadtutor.net/forum/showthread.php?t=33461

[chavlji]

Nope. Tried that before, but it didnt work. But thanks anyway.

 

Found this solution that works:

(defun C:SelectB()
(setq SS (ssget ":S")
(command "regenerate")
(SSSetFirst nil (ssget "X" (list (cons 410 (getvar "CTab")) (cons 0 "INSERT)))) 

[Lee Mac]

Thanks for posting it Chavlji, good to know