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.

 

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

 

Sorry, this is a known issue in the current release.

 

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).

 

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