Vytisknout stránku | Zavřít okno

Informace o obvodu dilce a plocha

Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: Inventor
Popis fóra: Otázky k programům Autodesk Inventor, Inventor Professional a Inventor LT, Product Design Collection a Suite, Factory Design Suite; a digitální prototypy
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=31144
Datum vytištění: 10.kvě.2026 v 14:27


Téma: Informace o obvodu dilce a plocha
Odeslal: maiklss
Předmět: Informace o obvodu dilce a plocha
Datum odeslání: 19.říj.2020 v 11:27
Dobrý den jakým způsobem jde dostat informace do výkresového razítka o ploše dílce a obvodu hran dilce?

-------------
Když můžu pomůžu:)


Odpovědi:
Odeslal: JDoubrava
Datum odeslání: 19.říj.2020 v 12:03
To chcete na plechy? Jsou tu na to myslím tipy.

Odeslal: maiklss
Datum odeslání: 19.říj.2020 v 12:27
Mužů poprosit o link

-------------
Když můžu pomůžu:)

Odeslal: JDoubrava
Datum odeslání: 19.říj.2020 v 12:40
Našel jsem podobné téma tady -
https://www.cadforum.cz/cadforum/delka-vnejsich-a-vnitrnich-hran-rozvinu-plechu-tip10593 - https://www.cadforum.cz/cadforum/delka-vnejsich-a-vnitrnich-hran-rozvinu-plechu-tip10593
https://www.cadforum.cz/cadforum/parametricke-zobrazeni-sirky-a-delky-rozvinu-plechu-tip6869 - https://www.cadforum.cz/cadforum/parametricke-zobrazeni-sirky-a-delky-rozvinu-plechu-tip6869


Odeslal: maiklss
Datum odeslání: 04.lis.2020 v 09:55
Super funguje. Jakým způsobem dokážu dostat plochu nátěru v mm2 či m2 do kusovníku? 
Do vykresu to jde z vlasnoti modelu ale v rozpisce tu vlasnost nikde nemůžu najít.


-------------
Když můžu pomůžu:)

Odeslal: MILKA
Datum odeslání: 06.lis.2020 v 10:16
Zdravím, mě napadá jen vytvoření uživatelské vlastnosti "povrch" v díle  =<SurfaceArea>
a tuto hodnotu volat v kusovníku
(vytvoření ivlastnosti zautomatizovat přes ilogic...)


-------------
Milan Schwarz

TMW, a.s.

Dvůr Králové n/L

Odeslal: maiklss
Datum odeslání: 06.lis.2020 v 21:00
Ano ale zde je to v cm2:(

-------------
Když můžu pomůžu:)

Odeslal: MILKA
Datum odeslání: 09.lis.2020 v 11:34
Jak kde.




-------------
Milan Schwarz

TMW, a.s.

Dvůr Králové n/L

Odeslal: maiklss
Datum odeslání: 09.lis.2020 v 17:12
To umim dostat do vykresu ale ja to chci  vytahnout do rozpisky

-------------
Když můžu pomůžu:)

Odeslal: Navara
Datum odeslání: 09.lis.2020 v 21:36
Podle mě to bez iLogicu nepůjde. 
V X-Tools je možné zapnout obsluhu událostí (například BeforeSave) a spouštět v něm následující externí pravidlo.
Pravidlo je vhodné spouštět jen nad souborem součásti.
Chování je velmi podobné standardním automatickým vlastnostem v X-Tools

'Nastaveni:
Dim areaPropertyName As String = "Plocha" ' Nazev uzivatelske iVlastnosti
Dim createMissingProperty As Boolean = False ' Vytvorit chybejici iVlastnost
Dim valueFormat As String = "0.##" ' Presnost hodnoty na dve desetinna mista
Dim conversionConstant As Double = 10 * 10 ' Prevodni konstanta jednotek cm2 => mm2

'ThisDoc.Document musi byt soucast
Dim partDoc As PartDocument = ThisDoc.Document

Dim area As Double = partDoc.ComponentDefinition.MassProperties.Area
area = area * conversionConstant

Dim userDefinedProperties As PropertySet = partDoc.PropertySets("{D5CDD505-2E9C-101B-9397-08002B2CF9AE}")

Dim areaProperty As [Property]
Try
    areaProperty = userDefinedProperties(areaPropertyName)
Catch
    If createMissingProperty Then
        areaProperty = userDefinedProperties.Add("", areaPropertyName)
    Else
        Return
    End If
End Try


Dim areaString As String = area.ToString(valueFormat)
If areaProperty.Value.ToString() <> areaString Then
    areaProperty.Value = areaString
End If


Vytisknout stránku | Zavřít okno