Zobrazit plnou verzi příspěvku: Těžiště podsestavy
Pavel Žáček
20.06.2012, 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?
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.
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.DocumentDim cog As WorkPointTry cog = doc.ComponentDefinition.WorkPoints(cogName) cog.SetFixed(doc.ComponentDefinition.MassProperties.CenterOfMass)Catch cog = doc.ComponentDefinition.WorkPoints.AddFixed(doc.ComponentDefinition.MassProperties.CenterOfMass) cog.Name = cogNameEnd Try