Hallo,
ich habe folgenden Code mit dem ich einen Body publiziere. Leider habe ich bisher keine Möglichkeit gefunden, den Body anhand von einem Objekt zu identifizieren. Ich musste bisher immer den Namen benutzen. Wenn es zwei Bodies mit dem gleichen Namen gibt, habe ich ein Problem. Wie könnte ich das lösen?
Code:
Dim partDocument1 As PartDocument
Set partDocument1 = CATIA.ActiveDocument
Dim product1 As Product
Set product1 = partDocument1.GetItem(part1.Name)
Dim reference1 As Reference
Set reference1 = product1.CreateReferenceFromName(part1.Name & "/!" & body1.Name) '<-- Problemstelle
Dim publications1 As Publications
Set publications1 = product1.Publications
Dim publication1 As Publication
Set publication1 = publications1.Add(body1.Name)
publications1.SetDirect body1.Name, reference1
Das hier funktioniert nicht:
Code:
Set reference1 = part1.CreateReferenceFromObject(body1)
Gruß Thorsten
[Diese Nachricht wurde von surfhai am 12. Aug. 2020 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP