Sssetfirst grip handles not visible

[andkal]

Hallo
Im writing a lisp program that is supposed to make some action on selected objects and leave them selected. The problem is that the grip handles of selected objects are not visible. I found that I have to leftclick somewhere in viewport or regenerate view to make them appear. Is there a way to simulate left clck in autolisp or is there some better way to make them visible not using mouseclock or REGEN (it makes a lag).

Here is a part of the code I have at the end of the routine:

    (setq count 0)
    (repeat (sslength sset2)
        (vlax-invoke-method (vlax-ename->vla-object (ssname sset2 count)) 'Highlight :vlax-true)
        (setq count (1+ count))
    );repeat
    (sssetfirst nil) 
    (sssetfirst nil sset2) 

 

[ВeekeeCZ · Accepted solution]

That typically happens when you have (allow) objects pre-selected.

You need to unhighlight that. This might work.

(defun c:test ()

  (if (setq sset2 (ssget "_I"))
    (sssetfirst nil)
    (setq sset2 (ssget)))
    (sssetfirst nil sset2)
  )

[andkal]

Thanks, It solves the problem.