| Author |
Message |
Wade
Guest
|
 Posted:
Mon Dec 20, 2004 10:03 pm Post subject:
Civil 3D vba question |
|
|
I am trying to write some code that will select an Aeccpoint object and
place that object in the selection set. Every time I select the point, the
entire Point Group (of AeccPointGroup) that that point belongs to is
highlighted. I am using the SSet.SelectOnScreen Method (Dim SSet as
AcadSelectionSet). Is there a trick to highlighting and adding just that
point object to the selection set - just like the List command does?
Thanks in Advance.
|
|
| Back to top |
|
 |
Allen Johnson
Guest
|
| Posted:
Tue Dec 21, 2004 12:41 am Post subject:
Re: Civil 3D vba question |
|
|
Have you tried the ThisDrawing.Utility.GetEntity method?
Dim e As AcadEntity
Dim pp(2) As Variant
ThisDrawing.Utility.GetEntity e, pp, "Pick a point"
ThisDrawing.Utility.Prompt e.Handle
"Wade" <wnederveld@preinnewhofdonotreply.com> wrote in message
news:41c7046c$1_2@newsprd01...
| Quote: | I am trying to write some code that will select an Aeccpoint object and
place that object in the selection set. Every time I select the point,
the
entire Point Group (of AeccPointGroup) that that point belongs to is
highlighted. I am using the SSet.SelectOnScreen Method (Dim SSet as
AcadSelectionSet). Is there a trick to highlighting and adding just that
point object to the selection set - just like the List command does?
Thanks in Advance.
|
|
|
| Back to top |
|
|
Jeff
Guest
|
| Posted:
Tue Dec 21, 2004 7:18 am Post subject:
Re: Civil 3D vba question |
|
|
Sorry, this is a known issue in the current release.
"Allen Johnson" <ajohnson@dwase> wrote in message
news:41c72b07$1_3@newsprd01...
| Quote: | Have you tried the ThisDrawing.Utility.GetEntity method?
Dim e As AcadEntity
Dim pp(2) As Variant
ThisDrawing.Utility.GetEntity e, pp, "Pick a point"
ThisDrawing.Utility.Prompt e.Handle
"Wade" <wnederveld@preinnewhofdonotreply.com> wrote in message
news:41c7046c$1_2@newsprd01...
I am trying to write some code that will select an Aeccpoint object and
place that object in the selection set. Every time I select the point,
the
entire Point Group (of AeccPointGroup) that that point belongs to is
highlighted. I am using the SSet.SelectOnScreen Method (Dim SSet as
AcadSelectionSet). Is there a trick to highlighting and adding just that
point object to the selection set - just like the List command does?
Thanks in Advance.
|
|
|
| Back to top |
|
|
Wade
Guest
|
| Posted:
Wed Dec 22, 2004 12:29 am Post subject:
Re: Civil 3D vba question |
|
|
Thanks for the reply.
It looks like Jeff is right. I tried your code below and added the
following lines:
e.Highlight
msgbox e.Handle
And still the Point Group is highlighted (not the single Point Object) and
the Handle that is returned is for the whole Point Group that the point
belongs to, not just the Point.Object.
I hope Autodesk fixes this issue and allows us code writers to be able to
drill down these high order objects to get at the individual components of
the objects like we used to be able to in LDD 2004. Just FYI, I noticed
that these components cannot be reached via Lisp either - and unfortunately
if we can't get to them, its going to increase our drawing time by 10
minutes to 1 hour per sheet (depending on how many points are in the
drawing).
"Allen Johnson" <ajohnson@dwase> wrote in message
news:41c72b07$1_3@newsprd01...
| Quote: | Have you tried the ThisDrawing.Utility.GetEntity method?
Dim e As AcadEntity
Dim pp(2) As Variant
ThisDrawing.Utility.GetEntity e, pp, "Pick a point"
ThisDrawing.Utility.Prompt e.Handle
"Wade" <wnederveld@preinnewhofdonotreply.com> wrote in message
news:41c7046c$1_2@newsprd01...
I am trying to write some code that will select an Aeccpoint object and
place that object in the selection set. Every time I select the point,
the
entire Point Group (of AeccPointGroup) that that point belongs to is
highlighted. I am using the SSet.SelectOnScreen Method (Dim SSet as
AcadSelectionSet). Is there a trick to highlighting and adding just
that
point object to the selection set - just like the List command does?
Thanks in Advance.
|
|
|
| Back to top |
|
|
Laurie Comerford
Guest
|
| Posted:
Thu Dec 23, 2004 4:19 pm Post subject:
Re: Civil 3D vba question |
|
|
Hi Wade,
We have been pushing for this to happen almost from Day 1 as it limits
functionality in 3D of some of our software.
It's good to get extra support.
--
Laurie Comerford
CADApps
www.cadapps.com.au
"Wade" <wnederveld@preinnewhofdonotreply.com> wrote in message
news:41c8796d$1_3@newsprd01...
| Quote: | Thanks for the reply.
It looks like Jeff is right. I tried your code below and added the
following lines:
e.Highlight
msgbox e.Handle
And still the Point Group is highlighted (not the single Point Object) and
the Handle that is returned is for the whole Point Group that the point
belongs to, not just the Point.Object.
I hope Autodesk fixes this issue and allows us code writers to be able to
drill down these high order objects to get at the individual components of
the objects like we used to be able to in LDD 2004. Just FYI, I noticed
that these components cannot be reached via Lisp either - and
unfortunately
if we can't get to them, its going to increase our drawing time by 10
minutes to 1 hour per sheet (depending on how many points are in the
drawing).
"Allen Johnson" <ajohnson@dwase> wrote in message
news:41c72b07$1_3@newsprd01...
Have you tried the ThisDrawing.Utility.GetEntity method?
Dim e As AcadEntity
Dim pp(2) As Variant
ThisDrawing.Utility.GetEntity e, pp, "Pick a point"
ThisDrawing.Utility.Prompt e.Handle
"Wade" <wnederveld@preinnewhofdonotreply.com> wrote in message
news:41c7046c$1_2@newsprd01...
I am trying to write some code that will select an Aeccpoint object
and
place that object in the selection set. Every time I select the
point,
the
entire Point Group (of AeccPointGroup) that that point belongs to is
highlighted. I am using the SSet.SelectOnScreen Method (Dim SSet as
AcadSelectionSet). Is there a trick to highlighting and adding just
that
point object to the selection set - just like the List command does?
Thanks in Advance.
|
|
|
| Back to top |
|
|
|
|
|
|
FAQ
Memberlist
Register
Profile
Log in to check your private messages
Log in