---

Hallo!

Ich weiß nicht ob das schon an anderer Stelle mal gefragt wurde, aber kann ich mit Hilfe eines Makros alle Komponenten (Parts, Products,...), die sich im No-Show befinden, löschen?

Gruß Manu

------------------
Wenn du sie nicht überzeugen kannst, verwirre sie!

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

---

Hallo,

natürlich geht das, sofern du unter löschen das entfernen aus der geladenen Struktur verstehst. Allerdings gehen event. vorhandene Links kaputt.

Gruss

TomTom

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

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

---

Hallo

die Befehle dazu lauten:

Selection.Search ("Sichtbarkeit=Unsichtbar;Alle")
und mit
Selection.delete
kannst du alle selektierten Elemente löschen.

Habs nicht getestet aber müsste so funktionieren.

Gruss Jules

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

---

Danke für eure Antworten, aber leider komm ich nicht weiter...

------------------
Wenn du sie nicht überzeugen kannst, verwirre sie!

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

---

Das die Links kaputt gehen macht nichts, es sollen nur alle Products und Parts im No-Show gelöscht werden

------------------
Wenn du sie nicht überzeugen kannst, verwirre sie!

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

---

Servus,

die "search" Funktion kann mit grosse Strukturen ewig dauern. Probiere es mal mit "ActivationState" oder "ComponentActivationState" in der Parameter Collection.

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

---

oupps,

das war ein Fehler von mir. Mit ActivationState kriegst du die deaktivierten bzw. aktivietten Parts und Products raus.
Show und NoShow Status lässt sich mit den VisProperties von der selection darstellen. "selection.visproperties.getshow"

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

---

Also folgendermaßen suche ich nach Parts im No-Show:

Language="VBSCRIPT"
Sub CATMain()
Dim productDocument1 As Document
Set productDocument1 = CATIA.ActiveDocument
Dim selection1 As Selection
Set selection1 = productDocument1.Selection
selection1.Search "CATAsmSearch.Part.InheritedVisibility=Hidden,all"
Set productDocument1 = CATIA.ActiveDocument
Dim selection2 As Selection
Set selection2 = productDocument1.Selection
selection2.Clear
End Sub

WIe kann ich das Ergebnis dieser Suche löschen?
Besonders dann, wenn dieses Ergebnis unterschiedlich sein kann (also wenn ich z.B. einmal part 1 und 3 und ein anderes mal part 5 und 6 im No-Show hab)????

------------------
Wenn du sie nicht überzeugen kannst, verwirre sie!

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

---

probiere es mit:

Sub CATMain()

Set productDocument1 = CATIA.ActiveDocument

Set selection1 = productDocument1.Selection
selection1.Search "CATAsmSearch.Part.InheritedVisibility=Hidden,all"

selection1.delete

End Sub

Aus der Hilfe:

Eine Methode von der selection:

Delete
Deletes all objects from the current selection.

Gruß, Chris

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

---

mit einer suche nach verdeckten Elementen wäre ich vorsichtig. Mir ist es schonmal passiert das er ein Part selektiert hat obwohl das Part nicht verdeckt war, sondern nur ein Punkt in einem Part.

Ich würde die Parts bzw. Products der Reihe nach in eine Selektion hinzufügen, dann die Visproperties überprüfen und mit einer

If showstate = catVisPropertyNoShowAttr Then

Selection.Add (Entsprechendes Part bzw. Product)
Selection.delete

End If

Mit der Methode kann man sehr sicher davon ausgehen das er wirklicht das Part bzw. das Prodcut überprüft.

Einzigstes Problem was ich sehe:

Was ist wenn ein Product verdeckt ist, jedoch Parts in dem Product sichtbar???

------------------
Wenn alle Stricke reissen, nehm ich ein Drahtseil

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

---

fehlermeldung1.JPG

Hallo prosper

damit habe ich es auch schon versucht, aber bei der Zeile

selection1.delete

zeigt er die Fehlermeldung im Anhang.
Weiß jemand warum???

------------------
Wenn du sie nicht überzeugen kannst, verwirre sie!

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

---

Hallo,

ist dein RootProdukt aktiv?

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

---

Ja, ich hab nur dieses Produkt auf und aktiv

------------------
Wenn du sie nicht überzeugen kannst, verwirre sie!

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

---

Hallo Mamelba83,

versuch es doch mal mit der Zeile:

Code:

---

selection1.cut

---

vor

Code:

---

selection1.delete

---

vielleicht hilft das schon.(Kann es leider gerade nicht prüfen!)

mfg,
Lusilnie

------------------

Alle Aussagen zu DassaultSystemes-Produkten sind sehr optimistisch, selbst diese!!!

frei nach größeren Geistern

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

---

fehlermeldung_cut.JPG

Hallo Lusilnie,

leider bringt er jetzt eine andere Fehlermeldung (siehe Bild).

Kann mir vielleicht jemand sagen wo bei folgendem Makro der Fehler liegt???

CODE:

Sub CATMain()

Set productDocument1 = CATIA.ActiveDocument

Set selection1 = productDocument1.Selection
selection1.Search "CATAsmSearch.Part.InheritedVisibility=Hidden,all"

selection1.cut
selection1.delete

End Sub

Wäre dankbar 

------------------
Wenn du sie nicht überzeugen kannst, verwirre sie!

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

---

Hallo,

ich vermute mal, dass deine Selection leer ist, prüf doch einfach mal vorher mit:

Code:

---

Msgbox (Selection1.count)

---

Wenn ich die Suche so anpasse dann läuft es:

Code:

---

Selection1.Search "'Product Structure'.Part.Visibility=Hidden;all"

---

Frage an alle:
Wofür sind die CATAsmSearch/CATGmoSearch/CATSpdSearch/... usw. gut?
Die kommen ja wohl vom Macrorecorder, kann darüber aber nirgends infos finden.
Ich kopiere immer den Suchstring(Query) aus dem Suchfenster und hatte bisher noch keine Probleme!

Gruß
CAMiCADse

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

---

Hallo CAMiCADse,

wenn ich das Makro mit deinen Zeilen zusätzlich füttere, dann läuft es so, wie ich es wollte.
Er löscht alle Teile im No-Show 
Zwar bringt er anschließend immer noch die Fehlermeldung "The Method Delete failed", aber er löscht sie 

Danke nochmal!

------------------
Wenn du sie nicht überzeugen kannst, verwirre sie!

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

---

[QUOTE]Original erstellt von CAMiCADse:

Frage an alle:
Wofür sind die CATAsmSearch/CATGmoSearch/CATSpdSearch/... usw. gut?
Die kommen ja wohl vom Macrorecorder, kann darüber aber nirgends infos finden.
Ich kopiere immer den Suchstring(Query) aus dem Suchfenster und hatte bisher noch keine Probleme!

Das sind die Suchstrings für die jeweiligen Workbenches die man auch in CATIA unter EDIT--> Search definieren kann. mit dieser auswahl begrenzt sich die Suche eben auf die verschiedenen workbenches. Mehr weiss ich darüber leider auch nicht

------------------
Wenn alle Stricke reissen, nehm ich ein Drahtseil

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