Topic: Highlight selected LWPOLYLINE

[MvdP]

I have a routine that has this piece of code but is it not highlighting the selected closed lwpolyline.

Code: [Select]

(prompt "\nSelect CLOSED  Polyline: ")
(while (not (setq ss (ssget ":e:s" '((0 . "LWPOLYLINE") (70 . 1)))))
(prompt "\nSelected object NOT a closed  Polyline.... "))

And the variable highlight is set to 1.
Can this piece of code be changed that when i select a lwpolyline it is highlighted.?

[Kerry]

Look at redraw .. just a sec'

[Kerry]

Perhaps try something like this ;

Code: [Select]

(PROMPT "\nSelect CLOSED  Polyline: ")
(WHILE (NOT (SETQ ss (SSGET ":e:s" '((0 . "LWPOLYLINE") (70 . 1)))))
  (PROMPT "\nSelected object NOT a closed  Polyline.... ")
)
(IF (SETQ ent (SSNAME ss 0))
  (REDRAW ent 3)
)

[gile]

Hi,

Something like this ?

Code: [Select]

(prompt "\nSelect CLOSED  Polyline: ")
   (while (not
    (setq ss (ssget "_:E:S" '((0 . "LWPOLYLINE") (70 . 1))))
  )
     (prompt "\nSelected object NOT a closed  Polyline.... ")
   )
   (sssetfirst nil ss)

[MvdP]

Thank you gile  and Kerry for your suggestions.
Kerry in your code the selected polyline stays highlighted and in gile's one it is not.!So i will use gile's piece of code.

[Kerry]

Oh, I thought you wanted it highlighted ..

[MvdP]

Yes i did , but when the complete routine has run not anymore.Sorry about not mentioning that Kerry