1 Answers
A:
Step-by-Step Strategy
Use MouseEvents.OnMouseClick or a custom command to detect the click location on the sheet.
Perform a hit test on the drawing view to get the selected geometry:
USA
UAE
vbnet
Dim oView As DrawingView = ' your selected view
Dim oPoint As Point2d = ThisApplication.TransientGeometry.CreatePoint2d(x, y)
Dim oHitResults As ObjectsEnumerator = oView.HitTest(oPoint, SelectionFilterEnum.kAllEntitiesFilter)
For Each oObj In oHitResults
If TypeOf oObj Is DrawingCurveSegment Then
Dim oCurve As DrawingCurveSegment = oObj
Dim oProxy As Object = oCurve.Parent.Geometry
' Now try to resolve the proxy to a ComponentOccurrence
End If
Next
Use GeometryProxy.ContainingOccurrence to get the ComponentOccurrence:
vbnet
Dim oOcc As ComponentOccurrence = oProxy.ContainingOccurrence
This gives you the actual part or subassembly occurrence in the assembly model.
Related Question and Answers
Q:
A:
Yes, you can add centerlines and centermarks to a drawing using VBA in Inventor. While the API doesn’t expose every annotation tool directly, it does provide enough access to programmatically create these features.
Q:
A:
Not true - both Inventor and SolidWorks are compatible with Microsoft .NET languages like C# and VB.NET, and both offer robust APIs for integration and automation.
Q:
A:
Yes, it is possible to preview a drawing in Autodesk Inventor using specific printer settings-but with a few caveats.
Q:
A:
Import AutoCAD Blocks into Inventor Drawing Templates
Q:
A:
As of now, the Inventor API does not provide write access to sheet formats. You can read the title block definition associated with a sheet format, but you cannot modify or replace it directly via the API.
Autodesk Inventor
AutodeskHelp the community
Be the First to Answer these questions
Disclaimer
Techjockey’s software industry experts offer advice for educational and informational purposes only. A category or product query or issue posted, created, or compiled by Techjockey is not meant to replace your independent judgment.
20,000+ Software Listed
Best
Price Guaranteed
Free Expert
Consultation
2M+
Happy Customers
