---

Hallo!

Ich versuche vergeblich an die Instanz zu kommen.
Ich habe in einem Product mehrere Instanzen eines CATParts. Wenn ich von
einer Instanz einen Punkt mit der SelectElement-Methode wähle und aufdrösel bekomme ich aber nirgends die Instanz des Parts (z.B. "Platte2.1") sondern das Referenzteil ("Platte2").
Wie komme ich an die verdammte Instanz

HELP!

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

---

Hallo,

wie bekommst du den namen denn?
normal muesste die nummer ueber den instancenamen kommen

dim prod1 as Product

prod1=selection.item(i).value

msgbox prod1.name ' mit instanzen Platte1.2
msgbox prod1.partnumber ! ohne instanzen Platte1

so gehts bei mir jedenfalls

------------------
gruss
scheuche

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

---

Hallo scheuche,

eventuell habe ich dich falsch verstanden, aber in deinem Beispiel bekommst Du in Deiner selection ein Part(vielmehr Product) zurück. Davon kannst Du natürlich die Instanzen der enthaltenen Products (Parts) auslesen, da Du eine Selection in der Assemblyebene gemacht hast.

Mein Problem besteht aber darin, daß ich in einem Assembly bin, und von einer Instanz eines enthaltenen Product (eben Platte2.1) einen 'Punkt.1' selektiere. Die Parent-Infos bringen mich dann nur bis zu der Information, das es der 'Punkt.1' in 'Platte2' ist (also der Referenzteil) ist aber ich benötige die Info, in welcher Instanz ich den Punkt selektiert habe.

Falls Du dafür eine Lösung hast, dann poste Sie hier mal.
Danke!

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

---

schau dir das mal an
ist das das was du brauchst?

###################################

Sub CATMain()

Dim montab(0)

montab(0)="Product"

Dim document
set document = CATIA.ActiveDocument

Dim selection
set selection = document.Selection

Dim TheSPAWorkbench
Dim TheMeasurable
Dim referenceObject

do
call selection.clear()
Dim str
str=selection.SelectElement(montab,"Please select an object",true)

if str = "Normal" then
Dim count
count = selection.Count
Dim Reference
Dim selectedElement
Dim objet
Dim i
for i=1 to count
set selectedElement = selection.Item(i)
dim prod as Product
set prod = selection.item(i).value
set referenceObject = selectedElement.Reference
msgbox referenceObject.Displayname
next
else
msgbox str
end if

Dim yesOrNo
yesOrNo = msgbox("Would you like to continue selecting object?",4,"Selection Option")

If (yesOrNo = 7) then
str = "Cancel"
End If

selection.clear
Loop While str = "Normal"

End Sub

##############################

------------------
gruss
scheuche

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

---

Hallo,

ich habe genau dasselbe Problem wie Henning Bruns. Wie komme ich zum Beispiel auf den Punkt eines instancierten Parts?? Ich möchte später mit den Instancen, Constraints erstellen und das Problem ist, dass das Makro immer auf den Punkt im CATPart greift (eigene Datei auf der Festplatte) und nicht auf den Punkt im instancierten Part.
Hat jmd bitte eine Lösung???

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