Message 1 of 3
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Hi all.
rectang 0,0 100,100
rectang 100,0 200,100
After creating the above
With the display style as 2D wireframe, execute the following Lsip and select each square
Two entities are selected for each.
If you change the display style to concept, execute test, and select each square
only one entity is selected.
Why is this?
Thank you.
(defun c:test ( / ent pts ss nn i id)
(setq ent (entget (car (entsel))))
(setq pts (mapcar 'cdr (vl-remove-if '(lambda (x) (/= (car x) 10)) ent)))
(setq ss (ssget "CP" pts))
(princ "\n")
(princ (setq nn (sslength ss)))
(setq i 0)
(repeat nn
(princ "\n")
(princ (ssname ss i))
(setq i (1+ i))
)
(princ)
)
Saitoib
Solved! Go to Solution.