Vytisknout stránku | Zavřít okno

Těžiště podsestavy

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 Professional, Product Design & Manufacturing Collection, Factory Design; digitální prototypy
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=15293
Datum vytištění: 27.čvc.2026 v 01:32


Téma: Těžiště podsestavy
Odeslal: Pavel Žáček
Předmět: Těžiště podsestavy
Datum odeslání: 20.čer.2012 v 12:43
Dobré odpoledne,
potřeboval bych ve výkresu nějaké sestavy zobrazit těžiště ne celé této sestavy, ale jen její podsestavy. Jde to nějak?


-------------
Pavel Žáček


Odpovědi:
Odeslal: MILKA
Datum odeslání: 20.čer.2012 v 15:11
Zkusím nástřel: v podsestavě použít utilitu COG, myslím, že se na vytvořený bod dalo vazbit
(např. malá koule) ta vám bude tvořit bod ve výkrese.


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

TMW, a.s.

Dvůr Králové n/L

Odeslal: Navara
Datum odeslání: 24.čer.2012 v 22:44
Nebo je možné si pomoci jednoduchým makrem pro iLogic, které při spuštění vytvoří/aktualizuje polohu pracovního bodu v dokumentu modelu. 
Dim cogName As String = "Teziste"

Dim doc As Document = ThisDoc.Document

Dim cog As WorkPoint
Try
    cog = doc.ComponentDefinition.WorkPoints(cogName)
    cog.SetFixed(doc.ComponentDefinition.MassProperties.CenterOfMass)
Catch
    cog = doc.ComponentDefinition.WorkPoints.AddFixed(doc.ComponentDefinition.MassProperties.CenterOfMass)
    cog.Name = cogName
End Try


Vytisknout stránku | Zavřít okno