topic Re: Select Single... in VBA Forum

Select Single...

Anonymous — Tue, 05 Mar 2002 12:51:53 GMT

I need to select a single object(s) and return to the code ":s") in lisp>. SendCommand would be perfect if vba would pause....

Re: Select Single...

Anonymous — Tue, 05 Mar 2002 13:06:43 GMT

Use ThisDrawing.Utility.GetEntity

--
"The penalty of success is to be bored
by people who used to snub you."
Nancy, Lady Astor

http://www.acadx.com

"Aaron Rumple" wrote in message
news:CEA65A884865DC795D5123B20ED3F7B3@in.WebX.maYIadrTaRb...
> I need to select a single object(s) and return to the code
to (ssget
> ":s") in lisp>. SendCommand would be perfect if vba would pause....
>
>

Re:

Anonymous — Tue, 05 Mar 2002 18:22:14 GMT

I'm using a GetEntity first and then if this fails to select an object, the
operation moves into a GetCorner, which points are then passed to a Select
acSelectionSetWindow or acSelecttionSetCrossing depending on the location of
the points. All this to simulate a (ssget ":s").

I'd be happy with the above, except I can only declare the "look" of the
rectangle drawn with GetCorner before the user moves the mouse - so there is
no way to give graphical feedback as to window or crossing like (sset ":s").

Hope that explains it better...

"Frank Oquendo" wrote in message
news:EE52CD804E02043332C624B92609EFD6@in.WebX.maYIadrTaRb...
> Use ThisDrawing.Utility.GetEntity
>
> --
> "The penalty of success is to be bored
> by people who used to snub you."
> Nancy, Lady Astor
>
> http://www.acadx.com
>
>
> "Aaron Rumple" wrote in message
> news:CEA65A884865DC795D5123B20ED3F7B3@in.WebX.maYIadrTaRb...
> > I need to select a single object(s) and return to the code
> to (ssget
> > ":s") in lisp>. SendCommand would be perfect if vba would pause....
> >
> >
>
>

Re: Select Single...

davidm_adn — Wed, 06 Mar 2002 00:11:31 GMT

Sorry to not provide an answer, but a question instead!! I hadn't heard of that :s method before, and it's great. Are there any others like it for use with ssget?

Re:

Anonymous — Wed, 06 Mar 2002 08:04:06 GMT

Virtually all the command line options available
for any "Select Object:" prompt.... See the online help for a complete list. I
just wish VBA were up to speed with lisp. I see lisp as a dead end down the road
and Vlisp as only an interim solution, so I'm trying to move as much stuff as
possible to VB/VBA and then .Net. The missing elements in VBA are not making it
simple.

style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">

"morrisde" <
href="mailto:morrisde@halcrow.com">morrisde@halcrow.com> wrote in
message
href="news:f0c1051.2@WebX.maYIadrTaRb">news:f0c1051.2@WebX.maYIadrTaRb...
Sorry
to not provide an answer, but a question instead!! I hadn't heard of that :s
method before, and it's great. Are there any others like it for use with
ssget?

Re:

Anonymous — Wed, 06 Mar 2002 12:46:35 GMT

Why not just create a selection set using selectOnScreen? Are you trying
to get past the issue with transparent commands and SelectOnScreen?
-Josh

Aaron Rumple wrote:

> I'm using a GetEntity first and then if this fails to select an object, the
> operation moves into a GetCorner, which points are then passed to a Select
> acSelectionSetWindow or acSelecttionSetCrossing depending on the location of
> the points. All this to simulate a (ssget ":s").
>
> I'd be happy with the above, except I can only declare the "look" of the
> rectangle drawn with GetCorner before the user moves the mouse - so there is
> no way to give graphical feedback as to window or crossing like (sset ":s").
>
> Hope that explains it better...
>
> "Frank Oquendo" wrote in message
> news:EE52CD804E02043332C624B92609EFD6@in.WebX.maYIadrTaRb...
>
>>Use ThisDrawing.Utility.GetEntity
>>
>>--
>>"The penalty of success is to be bored
>>by people who used to snub you."
>>Nancy, Lady Astor
>>
>>http://www.acadx.com
>>
>>
>>"Aaron Rumple" wrote in message
>>news:CEA65A884865DC795D5123B20ED3F7B3@in.WebX.maYIadrTaRb...
>>
>>>I need to select a single object(s) and return to the code
>>>
>>to (ssget
>>
>>>":s") in lisp>. SendCommand would be perfect if vba would pause....
>>>
>>>
>>>
>>
>
>

Re:

Anonymous — Wed, 06 Mar 2002 18:49:07 GMT

The goal had several objectives:
1. To eliminate the need for the enter after "SelectOnScreen". This allows
the operation to loop with nothing more than mouse picks single>

2. To pass the last point selected if one item was picked. I needed this so
I could evaluate if the object was a SubEntity or not.

3. Verify if the user entered cancel, right mouse click, spacebar or enter.

4. Allow users to select other select object options from keyboard - CP, F,
FP, etc.

I finaly got it all hacked out with some ActiveX VLisp calls (whew.), but it
does work.

This is the sort of thing that was well developed in Lisp. Autodesk
either needs to commit to a fully exposed VBA object model like Office apps,
or build a tighter link between VBA and Lisp. ...and don't get me started on
that Vlisp editor. Notepad rules!

"Minkwitz Design" wrote in message
news:3C86802B.2080901@ameritech.net...
> Why not just create a selection set using selectOnScreen? Are you trying
> to get past the issue with transparent commands and SelectOnScreen?
> -Josh
>
> Aaron Rumple wrote:
>
> > I'm using a GetEntity first and then if this fails to select an object,
the
> > operation moves into a GetCorner, which points are then passed to a
Select
> > acSelectionSetWindow or acSelecttionSetCrossing depending on the
location of
> > the points. All this to simulate a (ssget ":s").
> >
> > I'd be happy with the above, except I can only declare the "look" of the
> > rectangle drawn with GetCorner before the user moves the mouse - so
there is
> > no way to give graphical feedback as to window or crossing like (sset
":s").
> >
> > Hope that explains it better...
> >
> > "Frank Oquendo" wrote in message
> > news:EE52CD804E02043332C624B92609EFD6@in.WebX.maYIadrTaRb...
> >
> >>Use ThisDrawing.Utility.GetEntity
> >>
> >>--
> >>"The penalty of success is to be bored
> >>by people who used to snub you."
> >>Nancy, Lady Astor
> >>
> >>http://www.acadx.com
> >>
> >>
> >>"Aaron Rumple" wrote in message
> >>news:CEA65A884865DC795D5123B20ED3F7B3@in.WebX.maYIadrTaRb...
> >>
> >>>I need to select a single object(s) and return to the code
> >>>
> >>to (ssget
> >>
> >>>":s") in lisp>. SendCommand would be perfect if vba would pause....
> >>>
> >>>
> >>>
> >>
> >
> >
>

Re:

Anonymous — Thu, 07 Mar 2002 07:36:43 GMT

and don't get me started on
that Vlisp editor. Notepad rules!

yea, notepads compilation to an fas is pretty slick,,,,, 😄 chuckle

Aaron Rumple wrote:

> The goal had several objectives:
> 1. To eliminate the need for the enter after "SelectOnScreen". This allows
> the operation to loop with nothing more than mouse picks > single>
>
> 2. To pass the last point selected if one item was picked. I needed this so
> I could evaluate if the object was a SubEntity or not.
>
> 3. Verify if the user entered cancel, right mouse click, spacebar or enter.
>
> 4. Allow users to select other select object options from keyboard - CP, F,
> FP, etc.
>
> I finaly got it all hacked out with some ActiveX VLisp calls (whew.), but it
> does work.
>
> This is the sort of thing that was well developed in Lisp. Autodesk
> either needs to commit to a fully exposed VBA object model like Office apps,
> or build a tighter link between VBA and Lisp. ...and don't get me started on
> that Vlisp editor. Notepad rules!
>
> "Minkwitz Design" wrote in message
> news:3C86802B.2080901@ameritech.net...
>
>>Why not just create a selection set using selectOnScreen? Are you trying
>>to get past the issue with transparent commands and SelectOnScreen?
>>-Josh
>>
>>Aaron Rumple wrote:
>>
>>
>>>I'm using a GetEntity first and then if this fails to select an object,
>>>
> the
>
>>>operation moves into a GetCorner, which points are then passed to a
>>>
> Select
>
>>>acSelectionSetWindow or acSelecttionSetCrossing depending on the
>>>
> location of
>
>>>the points. All this to simulate a (ssget ":s").
>>>
>>>I'd be happy with the above, except I can only declare the "look" of the
>>>rectangle drawn with GetCorner before the user moves the mouse - so
>>>
> there is
>
>>>no way to give graphical feedback as to window or crossing like (sset
>>>
> ":s").
>
>>>Hope that explains it better...
>>>
>>>"Frank Oquendo" wrote in message
>>>news:EE52CD804E02043332C624B92609EFD6@in.WebX.maYIadrTaRb...
>>>
>>>
>>>>Use ThisDrawing.Utility.GetEntity
>>>>
>>>>--
>>>>"The penalty of success is to be bored
>>>>by people who used to snub you."
>>>>Nancy, Lady Astor
>>>>
>>>>http://www.acadx.com
>>>>
>>>>
>>>>"Aaron Rumple" wrote in message
>>>>news:CEA65A884865DC795D5123B20ED3F7B3@in.WebX.maYIadrTaRb...
>>>>
>>>>
>>>>>I need to select a single object(s) and return to the code
>>>>>
>>>>>
>>>>to (ssget
>>>>
>>>>
>>>>>":s") in lisp>. SendCommand would be perfect if vba would pause....
>>>>>
>>>>>
>>>>>
>>>>>
>>>
>
>