Löschen des Materials im Part (Dassault Systemes - PLM Solutions/CATIA V5 Programmierung)


	CATIA V5 Grundkurs \| Einsteiger - 5 Std. 15 Min 48

	KISTERS 3DViewStation: Germar Nikol - Der Visionär hinter der Erfolgsgeschichte, eine Pressemitteilung Meldungen abonnieren
Autor	Thema: Löschen des Materials im Part (1104 mal gelesen)
mkna Mitglied Konstrukteur Beiträge: 137 Registriert: 18.03.2005	erstellt am: 12. Mai. 2009 10:35 <-- editieren / zitieren --> Unities abgeben: Hallo Nun habe ich ein Makro in der Dokumentation gefunden mit dem man einem Part ein Material zuweisen kann. Weiß jemand von euch wie das Material wieder per Makro aus dem Part löschen kann? Vielen Dank schon mal Martin Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
tomtom1972 Mitglied dipl ing maschinenbau Beiträge: 608 Registriert: 22.03.2005 NVidia Quadro K4000 Intel Xeon E5-1620, 64GB RAM Windows10 64bit R30 <= CATIA V5 > =R19	erstellt am: 12. Mai. 2009 13:16 <-- editieren / zitieren --> Unities abgeben: Nur für mkna Hallo, das Material über .Add der Selection zufügen und löschen. Gruß ------------------ tomtom1972 Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
mkna Mitglied Konstrukteur Beiträge: 137 Registriert: 18.03.2005	erstellt am: 13. Mai. 2009 08:58 <-- editieren / zitieren --> Unities abgeben: Hallo Vielen Dank für Deine Antwort. Ich hatte nur Probleme das Material vernünftig zu deklarieren. Hier das script für diejenigen die es interessiert: Sub CatMain() Dim mypartdoc As PartDocument Set mypartdoc = CATIA.ActiveDocument Dim mypart As Part Set mypart = mypartdoc.Part Dim mymat As Material Dim omanager As MaterialManager Set omanager = mypart.GetItem("CATMatManagerVBExt") omanager.GetMaterialOnPart mypart, mymat Dim sel1 As selection Set sel1 = mypartdoc.selection sel1.Clear sel1.Add mymat sel1.Delete End Sub Martin Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)