Autor
|
Thema: HybrisShapes löschen ohne Selection.delete (742 mal gelesen)
|
JuliusCaesar Mitglied Student - Fahrzeugtechnik
Beiträge: 23 Registriert: 27.01.2015 Intel i7 q 2,30 GHz 16 GB RAM 64 Bit Betriebssystem Windows 7 Catia Version 5 - 6 Release 2014
|
erstellt am: 04. Mrz. 2015 16:18 <-- editieren / zitieren --> Unities abgeben:
Hallo an Alle, ich möchte am ende des Makros ein paar HybridShapes löschen onhe den zu Deleten (mit Selection.delete), weil die noch weiter verwendet sind. Ich will also auch nicht einfach ein "Hide" benutzen, da die noch sichtbar aufm Tree sind. Gibts eine Methode diesen Elementen so zu löschen, die sieht so ähnlich wie die Elementen erstellen Ohne "Geoset.Append"? Also ein Gegenbegriff zu Geoset.Append Kann jemand mir helfen VielenDank im Voraus. [Diese Nachricht wurde von JuliusCaesar am 04. Mrz. 2015 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
JuliusCaesar Mitglied Student - Fahrzeugtechnik
Beiträge: 23 Registriert: 27.01.2015 Intel i7 q 2,30 GHz 16 GB RAM 64 Bit Betriebssystem Windows 7 Catia Version 5 - 6 Release 2014
|
erstellt am: 06. Mrz. 2015 15:07 <-- editieren / zitieren --> Unities abgeben:
|
bgrittmann Moderator Konstrukteur
Beiträge: 11780 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 06. Mrz. 2015 15:18 <-- editieren / zitieren --> Unities abgeben: Nur für JuliusCaesar
Servus Schau dir mal die Methode "DeleteObjectForDatum" an. Ich hab mal gelesen dass es damit gehen könnte. Wenn nicht: Selection in Collection zwischen speichern und Element selektieren und löschen. Gruß Bernd EDIT: hier noch ein Link dazu ------------------ Warum einfach, wenn es auch kompliziert geht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
JuliusCaesar Mitglied Student - Fahrzeugtechnik
Beiträge: 23 Registriert: 27.01.2015 Intel i7 q 2,30 GHz 16 GB RAM 64 Bit Betriebssystem Windows 7 Catia Version 5 - 6 Release 2014
|
erstellt am: 09. Mrz. 2015 09:54 <-- editieren / zitieren --> Unities abgeben:
Hallo Bernd, Vielen Dank für deine Antwort. Mit DeleteObjectForDatum hat es leider nicht funktioniert. ich habe mit Collection versucht, und kriege die gleiche Problem wieder,bin aber mir nicht sicher. Mache ich das so richtig? Code:
Set SplitDel = Cad.Selection Dim CollectionDel As CollectionSplitDel.Clear For t = 0 to d SplitDel.Add SplitListOrg(t) Next CollectionDel.Add SplitDel For t = 0 To d if Not IntDrafts (t) = "1" Then SplitDel.Item(t).delete End if Next
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann Moderator Konstrukteur
Beiträge: 11780 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 09. Mrz. 2015 17:59 <-- editieren / zitieren --> Unities abgeben: Nur für JuliusCaesar
Servus Den Inhalt der Selektion zwischenspeichern geht zB so: Code:
Dim oCollection As Collectionfor i = 1 to oselection.count oCollection.Add oselection.item2(i).value Next
Deinen Code kann ich nicht ganz nachvollziehen, da mir noch Informationen zu den verschiedenen Objekten fehlen. Gruß Bernd ------------------ Warum einfach, wenn es auch kompliziert geht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
JuliusCaesar Mitglied Student - Fahrzeugtechnik
Beiträge: 23 Registriert: 27.01.2015 Intel i7 q 2,30 GHz 16 GB RAM 64 Bit Betriebssystem Windows 7 Catia Version 5 - 6 Release 2014
|
erstellt am: 11. Mrz. 2015 09:24 <-- editieren / zitieren --> Unities abgeben:
|