Are entities joined?

if it's the last command perform (pedit, join, selection set)
then your (sslength (ssget "p")) should be 1
if it's more than 1, they didn't all get joined....

Casey
(but I'm just a lisp hack so I may be wrong)

 

Nevermind, I was wrong.

 

R2005:

What is a good way to test to see if all entities in a selection set get joined using the pedit command?

(command "_.pedit" (ssname ss7 0) "J" ss7 "" "X")

Need to have an alert in case it doesn't finish clean.

TIA

Bill

 

Just a guess, but maybe you could count the number
of segments before and after?

--
Autodesk Discussion Group Facilitator

joined using the pedit command?

 

Hi Bill, I'm skeptical, but does this work for you? Ssname still returns
the ename after pedit, but entget returns nil if the ename was joined (i.e.
no longer exists).
--
James Allen, EIT
Malicoat-Winslow Engineers, P.C.
Columbia, MO

Code:

; Minimally tested in a2k5
(defun joined-p (ss / cnt n)
(setq n   (sslength ss)
cnt 0
)
(repeat n
(setq n (1- n))
(if (entget (ssname ss n))
(setq cnt (1+ cnt))
)
)
(if (= cnt 0) t)
)

joined using the pedit command?

 

Thanks guys,

I was thinking along these lines.
Thought maybe there was a standard way.

Busy day, I'll have to test later.

Bill

 

About what? I just tried it and it works fine.

rs

 

Thanks,
I already tried that.

Bill