Einzelteilzeichnungskopf auf mehrere Blätter (Dassault Systemes - PLM Solutions/CATIA V5 Programmierung)


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

	Mit der Kisters 3DViewStation komplexeste 3D CAD-Daten beherrschen, eine Pressemitteilung Meldungen abonnieren
Autor	Thema: Einzelteilzeichnungskopf auf mehrere Blätter (468 mal gelesen)
maxi7 Mitglied Beiträge: 32 Registriert: 25.04.2002	erstellt am: 28. Mai. 2009 10:09 <-- editieren / zitieren --> Unities abgeben: Hallo Zusammen, ich habe mir ein Makro für einen Zeichnungskopf bei Einzelteilzeichungen geschrieben. Dieses Makro entnimmt sämtliche Stücklisteninformationen aus dem jeweiligen CATPart und fügt diese auf der Einzelteilzeichung als Zeichnungskopf hinzu. Funktioniert soweit ganz gut. In einem CATDrawing befinden sich mehrere Blätter und auf jedem Blatt wird ein Einzelteil dargestellt. Das Makro muß für jede Einzelteilzeichung einmal angewendet werden. Wie schaffe ich es nun, daß dieses Makro am Ende einmal betätigt wird und auf allen Blättern des CATDrawings der jeweilige Detailkopf eingefügt wird? Wie kann ich also umschalten von Blatt1 auf Blatt2 bis auf Blatt x und immer wieder an den Anfang des Makros springen? Im Voraus besten Dank! Viele Grüße ------------------ maxi7 Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
DanielFr. Ehrenmitglied V.I.P. h.c. Manager Beiträge: 2506 Registriert: 10.08.2005 HP Compaq 8710w, Intel Core Duo T7700, 2,40 Ghz, 3GB RAM, Windows XP Professionel @32bit, Quadro FX 1600M, CATIA V5 R19 SP3	erstellt am: 30. Mai. 2009 12:16 <-- editieren / zitieren --> Unities abgeben: Nur für maxi7 Hallo maxi, als erstes solltest du dich mit dem Begriff rekursive Programmierung bzw. rekursive Funktion vertraut machen. Ich würde wie folgt vorgehen: 1. Du teilst das Makro in eine Sub CATMain und in eine Funktion. In der Sub CATMain wird das erste Blatt gelesen und an die Funktion weitergegeben (das erste Blatt kannst du ja aus der SheetsCollection abfragen (Item(1)). 2. Die Funktion hat als Input ein Sheet (wenn du von der CATMAin kommst kannst du der Funktion das oSheets.Item(1) weitergeben) 3. Innerhalb der Funktion erzeugst du deinen Zeichnungkpf auf dem aktiven Sheet 4. Ist die Funktion am Ende rufst du sie wieder auf (also innerhalb der Funktion die selbe Funktion aufrufen) aber als Input zählst du den Counter der SheetsCollection hoch (also nicht mehr Item(1) sonder Item(2)) Damit startest du wieder die Funktion nur nicht auf dem ersten Blatt sonder auf dem zweiten. Das passiert so lange bis keine Sheets mehr in der Collection sind. Ich hoffe das ist ein wenig zu verstehen. Schönes Wochenende ------------------ MFG Daniel Die KATJA ist halt doch nur ne zickige Französin Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)