Hi Kirsten,
Try grabbing the polyline with getentity or selectonscreen like you are
doing, then test the entity to verify it is a closed polyline. Once you
have that, you should be able to just pass the coordinates property of
the polyline to the "points list" argument of the selectbypolygon
method, giving you a new selectionset of the entities within the
original polyline.
-Josh
Kirsten wrote:
> Is there a way to select everything within a closed polyline by simply
> selecting the polyline?
>
> (Please note: This is not the same as the cpolygon or wpolygon. You have
> to pick each individual point for that command. I just want to select the
> line.)
>
> Jason gave me the following lisp file (see below), but I don't know Lisp, so
> I'm trying to translate it to VBA. I can select the polyline with the
> SelectOnScreen command, and can select every entity within the drawing, but
> am unsure how to test if the entity is within the boundary.
>
> Has this already been done or am I reinventing the wheel?
> TIA, -Kirsten
>
> Lisp file:
> (defun C:Test ()
> (ssget "wp" (massoc 10 (entget (car (entsel "\nselect polyline:")))))
> )
>
>
> (defun massoc (key alist / x nlist)
> (foreach x alist
> (if (eq key (car x))
> (setq nlist (cons (cdr x) nlist))
> )
> )
> (reverse nlist)
> )
>
>
>
>
>
