Hallo Leute,
ich wollte Relationsets unter Relations erzeugen, um die Uebersichtlichkeit von Formeln, Rules usw. zu verbessern. Der Strukturbaum sollte dann so aussehen wie im Bild.
Ich habe nach langem Probieren ein kleines Programm zustande gekriegt, dass mir die Relationsets erzeugt.
'Erzeugen eines Relation-Sets
Sub CATMain()
Set oDoc = CATIA.ActiveDocument
Set partDoc = oDoc.Part
Set oPara = partDoc.Parameters
Set oRel = partDoc.Relations
' Erzeugen des Relation-Sets unter dem ersten Geo-Set
'oRel.CreateSetOfRelations(partDoc.hybridBodies.Item("Geometrical Set.1"))
' Erzeugen des Relation-Sets unter Relations
oRel.CreateSetOfRelations (oRel.GetItem("Relations"))
End Sub
Der naechste Schritt sollte die Umbennung der Sets sein und dann das Reorder der Items in die entsprecheneden Sets, also alle Formeln in das Set "Formeln" usw. Aber hier scheitere ich. Mit Sicherheit habt ihr den entscheidenden Hinweis fuer mich.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP