---

Hey

vielleicht schon mal jemand gemacht... suche Möglichkeit *.vb script

bei geöffneter BG

1. Ctrl & A
2. RMB auf Assemly Nav
3. Open
4. Component Fully

im Solution Center hab ich sowas nur als C++ gefunden (hört sich jedenfalls so an)

- fully load assembly tree
Document ID:nx_api1628
https://solutions.industrysoftware.automation.siemens.com/view.php?sort=desc&q=Load+Assembly+fully&dt=nx-api&p=2&file_type=text&i=nx_api1628&k=7&o=20

- fully open assembly
Document ID:nx_api3479
https://solutions.industrysoftware.automation.siemens.com/view.php?sort=desc&dt=nx-api&q=fully+load+assembly+tree&file_type=text&i=nx_api3479&k=6&o=0

Leider hab ich beim Programmieren zwei Linke Hände..... in VB hab ich nur Reports gefunden, bringt mich nicht wirklich weiter...

Danke vorab

BK

------------------
“Vision without action is a daydream. Action without vision is a nightmare."

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

---

Hallo Big King,

auch mit zwei rechten Händen ist mir nicht klar, was Du bezwecken willst. Und das ist nun mal Grundvoraussetzung, um überhaupt mit einer Programmierung anzufangen.

Den Ablauf kannst Du ja in VB aufzeichnen, denke die hier benötigten Funktionen werden alle protokolliert. Was fehlt dann noch, wie soll ein solches Programm später bedient werden ? Sollen vielleicht die 4 interaktiven Schritte durch einen Klick ersetzt werden ?

Gruß, Michael

------------------
Ein Mensch wird laut, wenn er was will;
wenn er's erst hat, dann wird er still;
Das "Danke" ist, nach alter Sitte,
Weit selt'ner als das "Bitte, Bitte".

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

---

also ...

Load Options sind bei und auf "Teilweises laden"
um alles nachzuladen müssen die oberen schritte ausgeführt werden.
und ja logisch wird das Programm dann durch ein BUTTON ausgeführt.

hab auch schon was ähnliches gefunden: nx_api4136

mfg

------------------
“Vision without action is a daydream. Action without vision is a nightmare."

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

---

Muss man das "LoadFully" nur auf der obersten Baugruppenebene (=1) machen oder muss mans auch explizit für die ggf. darin enthaltenen Komponenten tun ?

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

---

auch für die darin enthaltenen

------------------
“Vision without action is a daydream. Action without vision is a nightmare."

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

---

Hallo Big King,

mit folgendem Code funktioniert bei mir das vollständige Laden aller Komponenten:

Dim theSession as Session
Dim DisplayPart as Part = theSession.Parts.Display
Dim ListComponents as List(Of Component) = **In dieser Liste müssen alle Komponenten enthalten sein, die vollständig geladen werden sollen**
theSession.Parts.LoadOptions.UsePartialLoading = False
DisplayPart.ComponentAssembly.OpenComponents(NXOpen.Assemblies.ComponentAssembly.OpenOption.ComponentOnly, ListComponents.ToArray, Nothing)

Grüße
luke21

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

---

Hallo luke21,

das ist zwar ein wichtiger, aber leider nur ein Teil der Lösung. Gut, auf die fehlenden Komponenten hast du ja schon hingewiesen. Die kriegt man per Rekursion heraus, dafür findet sich hier sicher auch ein Beispiel.

Dann vermute ich noch einen Knackpunkt: Wenn ein Part gar nicht geöffnet wurde, z.B. weil die Load Options auf Structure only stehen, müsste es zuerst noch geöffnet werden. Aber auch das wäre kein Hexenwerk ...

Gruß, Michael

------------------
Ein Mensch wird laut, wenn er was will;
wenn er's erst hat, dann wird er still;
Das "Danke" ist, nach alter Sitte,
Weit selt'ner als das "Bitte, Bitte".

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