Inquire Element - Measure Diameter by VBA

 

Hi, we have adaptive part with adaptive Inner diameter. Measure value for  this during placing into assembly isn't easy. We tryed made macro working this way:

1) select adaptive part by mouse

2) run macro with selected part (adaptive part in selecset)

3) Choose some cylindre in assembly by mouse click (Eg. shaft) + measure it's diameter by VBA.

How we can choose part/diameter and grab the diameter? (we need sometning like "objApp.StartCommand 25072" and grab Diameter results)

4) use measured value for update adaptive part - no problem (Call ObjAdjustablePart.SetAdjustables.....)

Do somebody have idea how we can try it? We have problem only with point 3. Thank you!

 

EDIT:

NO IDEA? We only need choose cylindre in Assembly, no whole part.

 

Posted by: Jiri Marek
Post date: 9/2/2010 1:40:56 AM

1 REPLY

RE: Inquire Element - Measure Diameter by VBA

No help, we must find it ourselve

.

.

    Set objMouse = objCommand.Mouse

    objCommand.Start

    objMouse.LocateMode = 2

    objMouse.AddToLocateFilter 32

.

.

.

  ....pGraphicDispatch.Object....

.

.

.

 

 

 

Posted by: Jiri Marek
Post date: 10/19/2010 7:29:20 PM