CAD Forum - tips, tricks, discussion and utilities for AutoCAD, Inventor, Revit and other Autodesk products [www.cadforum.cz]
CZ | EN | DE
Login or
registration
  Visitors: 18669

CAD tip CAD tip # 12697:

   
Question CAD 
 %  platform  category 
Q - question

Opposite angle for angular dimensions in Inventor drawings (iLogic).

A - answer How to dimension angles including the value of an opposite angle (to 90°) in Inventor drawings?

If you need to show not only the main value of an angle but also a complementary opposite angle value (to 90°), you can use the following iLogic rule. It adds the "opposite" angle (in parentheses) to a selected, plain angular dimension. The displayed preecision will be the same as in the main dimension.

Any subsequent change of the angle or dimension style will not update the opposite angle dimension dynamically. You will need tu re-apply the rule. You can add an icon for this rule into Inventor ribbon e.g. by using our X-Tools (T4I).

The iLogic code:

'Adds opposite (90°) angle to ang.dimension (CAD Studio, 2020, www.cadforum.cz)
Dim oSelection As Object = ThisApplication.CommandManager.Pick(SelectionFilterEnum.kDrawingDimensionFilter, "Select an angular dimension:")
If IsNothing(oSelection) Then Return
If oSelection.Type <> kAngularGeneralDimensionObject Then
	MsgBox("This is not an angular dimension!", vbCritical, "Inventor")
	Return
End If
Dim oDim As AngularGeneralDimension = oSelection
Dim opposíte As Double = 90.0-oDim.ModelValue*180.0/PI 'opposite to 90°
If oDim.Text.FormattedText.Contains("°)") Then 'update
	oDim.Text.FormattedText = "<‍DimensionValue/>" & vbCrLf & "(" & CStr(Round(opposíte,oDim.Precision)) & "°)"
Else 'create
        oDim.Text.FormattedText = oDim.Text.FormattedText & vbCrLf & "(" & CStr(Round(opposíte,oDim.Precision)) & "°)"
End If
oDim.Text.HorizontalJustification = kAlignTextCenter
Inventor
100% *  CAD 
16.8.2020    14504×  
Prices - CAD eShop:
applies to: Inventor ·

See also:
Tip 13965:Total length of sweeps in Inventor - wires, pipes, trusses, tubes, hoses (iLogic)
Tip 13963:Sum of pipe element lengths in Inventor (iLogic).
Tip 13920:Saving your Inventor model in the presentation color scheme (iLogic).
Tip 13911:How to print all sheets at once from Inventor?
Tip 13884:How to send e-mails with an iLogic macro?


Back   All CAD Tips



Have we helped you? If you want to support the CAD Forum web service, consider buying one of our CAD applications, or our custom software development offerings, or donating via PayPal (see above). You may also add a link to your web - like this "fan" link: CAD Forum - tips, utilities, blocks for Autodesk products
CAD:    OS:    Categ: 
Text:  FAQ glossary   



Featuring:
Increase your productivity with our set of add-on functions for AutoCAD Civil 3D
CADstudio Civil Tools More info


Please use these tips at your own risk.
Arkance Systems is not responsible for possible problems that may occur as a result of using any of these tips.
TOPlist