Vytisknout stránku | Zavřít okno

Reprezentace iLogic

Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: iLogic a ETO
Popis fóra: Funkce a makra iLogic, Inventor Engineering to Order (ETO), automatizace a konfigurace výrobků
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=32856
Datum vytištění: 09.kvě.2026 v 09:18


Téma: Reprezentace iLogic
Odeslal: PopelkaM
Předmět: Reprezentace iLogic
Datum odeslání: 10.úno.2022 v 10:15
Dobrý den,
níže uvedené iLogic pravidlo aktivuje Pohledovou reprezentaci a Úroveň detailů v hlavní sestavě iam.
Lze řídit  Pohledovou reprezentaci a Úroveň detailů v některé z podsestav vložené v hlavní sestavě?
Popřípadě jak by vypadala případná úprava iLogic pravidla?

Děkuji za radu Popelka


'Pohledová reprezentace
Dim odoc As Document
Dim ocompdef As ComponentDefinition
odoc = ThisApplication.ActiveDocument
ocompdef = odoc.ComponentDefinition
Try
ocompdef.RepresentationsManager.DesignViewRepresentations.Item("10E6").Activate
Catch
MessageBox.Show("Tato pohledová reprezentace neexistuje", "Vytvořte 10E6")
End Try

'Úroveň detailů
Try
ocompdef.RepresentationsManager.LevelOfDetailRepresentations("10E6").Activate
Catch
MessageBox.Show("Tato úroveň detailů neexistuje", "Vytvořte 10E6")
End Try


Odpovědi:
Odeslal: Navara
Datum odeslání: 10.úno.2022 v 16:03
Tohle je minimalistický kód jako příklad

Dim asmDef As AssemblyComponentDefinition = ThisDoc.Document.ComponentDefinition
Dim occName = "20220210-01:1"

Dim designViewRep = "Pohled1" 
asmDef.Occurrences.ItemByName(occName).SetDesignViewRepresentation(designViewRep)

Dim levelOfDetailRep = "Level1"
asmDef.Occurrences.ItemByName(occName).SetLevelOfDetailRepresentation(levelOfDetailRep)

Odeslal: PopelkaM
Datum odeslání: 11.úno.2022 v 10:10
Děkuji funguje s pozdravem Popelka Smile


Vytisknout stránku | Zavřít okno