Diskuzní fórum a databáze tipů a utilit pro AutoCAD, Inventor, Revit a další produkty Autodesk
 - od firmy CAD Studio [www.cadforum.cz slaví 20 let]
ČeskySlovenskyEnglishDeutsch
Přihlášení:
▶ Registrace

 právě nás čte: 2399 

CAD tip CAD tip # 12696:

Otázka CAD 
 %  platforma  kategorie 
Q - otázka

Doplňkový úhel pro kóty úhlů ve výkresu Inventoru (iLogic).

A - odpověď Jak na výkresu Inventoru okótovat úhly včetně hodnoty doplňkového úhlu do 90°?

Pokud potřebujete zobrazit kromě hlavní hodnoty úhlu i velikost úhlu doplňkového (do 90°), můžete použít následující iLogic pravidlo. Do vybrané, obyčejné kóty úhlu doplní požadovaný "doplňkový" úhel v závorce. Zobrazená přesnost bude stejná jako u hlavní kóty.

Při případné následné změně úhlu nebo stylu kóty se hodnota doplňkového úhlu dynamicky nepřepíše. Je potřeba pravidlo spustit znovu. Volání pravidla si můžete přidat do ribbonu např. pomocí nástrojů X-Tools.

Kód iLogic:

'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    221×  
font ilogic inventor kóta text výkres
 
Související CAD produkty:
platí pro: Inventor ·

Zpět   Všechny další tipy



Pomohl vám tento tip? Provoz služby CADForum.cz podpoříte i nákupem produktů Autodesk u provozovatele tohoto serveru a Platinum partnera Autodesku, firmy CAD Studio.
Můžete si také přidat odkaz na vaše stránky: CAD Fórum - diskuze, tipy, bloky a utility
CAD:    OS:    Kateg: 
Text:  FAQ   






Tipy a triky prosím využívejte na vlastní zodpovědnost.
Provozovatel (CAD Studio s.r.o.) nenese odpovědnost za případné potíže vzniklé v souvislosti s použitím kteréhokoliv z uvedených tipů.
Pro plné zvládnutí dané aplikace doporučujeme absolvování některého z nabízených CAD školení.
Další publikování obsahu je dovoleno jen se souhlasem autora.
TOPlist