---

Hallo

gibt es eine Möglichlichkeit von einem selektierten Face ein "Parent" rauszubekommen? Arbeitsumgebung wäre das Assembly Design.

Beispiel:
Set documents1 = CATIA.Documents
Set partDocument1 = documents1.Item("5453.CATPart")
Set part1 = partDocument1.Part
Set reference1 = part1.CreateReferenceFromName("Selection_RSur Face Brp Pad.1;0 Brp Sketch.1;3)));None );Cf9 ));Pocket.1_ResultOUT)")

reference1 wäre eine selektiere Face zum Beipsiel im ZSB
nun möchte ich gern ein "Parent" davon finden z.B Pat1 oder so
leider funktioniert reference1.parent nicht

danach will ich dieses Elternteil weiter bearbeiten um den Part.CATPart zu finden im Product
(pat1.parent funktioniert hier)

Danke

mfg

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Referenz vom Namen oder BRep?

Und wie bist Du zu diesem langen Namen gekommen? "Pocket.1" (ist übrigens das gesuchte Element) von Hand ausgewählt?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo

also wir färben Flächen ein um damit Toleranz anzutragen, ist ja so im CatiaV5 fast standard

Wenn ich nun ein Fläche von irgendeinem Part im Assembly Design selektieren, bekomme ich mit ".Value" diesen Namen.

Ziel ist es den Part zu finden zu dem die selektierte Fläche gehört.

Testmacro:

Sub CATMain()
'Selection von Probe Dummy
Set UserSel = CATIA.ActiveDocument.Selection
Set Dummy1 = UserSel.Item(1)
UserSel.Clear

' In welchem Document selectiere ich!
Set DummyDocument1 = Dummy1.Document
MsgBox "Selection im Document: "+DummyDocument1.Name

MsgBox "Name der Selection: " + Dummy1.Name
MsgBox "Typename der Selection: " + TypeName(Dummy1)

Set DummyValue1 = Dummy1.Value
MsgBox "Name der Selection.Value: " + DummyValue1.Name
MsgBox "Typename der Selection.Value: " + TypeName(DummyValue1)

MsgBox TypeName(DummyValue1.Parent)
MsgBox DummyValue1.Parent.Name

MsgBox TypeName(DummyValue1.Parent.Parent)
MsgBox DummyValue1.Parent.Parent.Name

MsgBox TypeName(DummyValue1.Parent.Parent.Parent)
MsgBox DummyValue1.Parent.Parent.Parent.Name

MsgBox TypeName(DummyValue1.Parent.Parent.Parent.Parent)
MsgBox DummyValue1.Parent.Parent.Parent.Parent.Name

End Sub

Wenn du einen Body, Pat usw. im Part selektierst, dann finde ich den dazugehörigen Part. Leider klappt das nicht bei einer Fläche

mfg

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Leipziger,

übergeordnete Elemente eines BReps (wie z.B. deine Fläche) kannst du ganz einfach finden, in dem du sie mit der .FindObject Methode aus der Selection ausliest (in deinem Fall am besten die SelectElement2 Methode). Das funktioniert grundsätzlich mit allen Objekten, die mit einer Selection auswählbar sind. Der Makro-Rekorder ist bezogen auf Selections nicht sehr brauchbar. Aber die OnlineDoku ist in diesem Punkt gut!
So gehts:

Language="VBSCRIPT"

Sub CATMain()

Dim oSelection, Status
Dim InputObjectType(0)

InputObjectType(0) = "Face" 

Set oSelection = CATIA.ActiveDocument.Selection

Status = oSelection.SelectElement2(InputObjectType, " **********      Bitte eine Fläche auswählen, ESC = Abbruch       ********** ", False)   '--- UserSel

If (Status <> "Normal") Then
   msgbox "Abbruch", 16,"Error"
Else
   Set oSearchedPart = oSelection.FindObject("CATIAProduct")
   msgbox oSearchedPart.Name, 64,"Name der zugehörigen Instanz (Part)"
End If

End Sub

Gruss TomTom

------------------
tomtom1972

[Diese Nachricht wurde von tomtom1972 am 14. Dez. 2005 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo TomTom

danke schön! du hast mir sehr weitergeholfen.

Es klappt es so wie ich es haben will.

Grüße aus Leipzig

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP