Autor
|
Thema: GeometricalSet verschieben (444 mal gelesen)
|
AL-Fonse Mitglied Entwicklungsingenieur
Beiträge: 37 Registriert: 23.02.2010 Win Vista<P>CatiaV5 R16 R19
|
erstellt am: 23. Feb. 2010 14:31 <-- editieren / zitieren --> Unities abgeben:
Servus! Stehe zwar noch ganz am Anfang der Makroprogrammierung und möchte gerne folgendes Problem lösen.... Ich möchte ein "Übergeordnetes" GeoSet erzeugen und in dieses "Unter"-GeoSets erzeugen. Anhand meiner Bücher konnte ich für dieses Problem leider keine Lösung finden. Für eine Hilfestellung wäre ich sehr Dankbar. Grüße AL-Fonse Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
HoBLila Mitglied Dipl.-Ing. (BA) praktische Informatik - Senior Entwickler CAx
Beiträge: 1118 Registriert: 29.05.2008 DELL PRECISION T3500 Intel(R) Xeon(R) CPU W3540 @ 2.93GHz 12285 MB RAM NVIDIA Quadro FX 1800 Microsoft Windows 7 Enterprise Service Pack 1 CATIA V5 R19 SP09 HF69 VB6.5 CAA RADE CDC
|
erstellt am: 23. Feb. 2010 14:41 <-- editieren / zitieren --> Unities abgeben: Nur für AL-Fonse
Also der Makrorekorder sagt, und da kann ich ihm nur zustimmen: Code:
Language="VBSCRIPT"Sub CATMain() Set partDocument1 = CATIA.ActiveDocument Set part1 = partDocument1.Part Set hybridBodies1 = part1.HybridBodies Set hybridBody1 = hybridBodies1.Add() part1.Update Set hybridBody2 = hybridBody1.HybridBodies.Add() part1.Update End Sub
------------------ Mit freundlichen Grüßen, Henry Schneider alias Lila Es gibt einen ewigen Wettkampf zwischen der Natur und den Ingenieuren: Die Ingenieure versuchen, immer idioten-sicherere Systeme zu bauen, die Natur versucht, immer bessere Idioten zu bauen Xing Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
AL-Fonse Mitglied Entwicklungsingenieur
Beiträge: 37 Registriert: 23.02.2010 Win Vista<P>CatiaV5 R16 R19
|
erstellt am: 23. Feb. 2010 15:02 <-- editieren / zitieren --> Unities abgeben:
|
HoBLila Mitglied Dipl.-Ing. (BA) praktische Informatik - Senior Entwickler CAx
Beiträge: 1118 Registriert: 29.05.2008 DELL PRECISION T3500 Intel(R) Xeon(R) CPU W3540 @ 2.93GHz 12285 MB RAM NVIDIA Quadro FX 1800 Microsoft Windows 7 Enterprise Service Pack 1 CATIA V5 R19 SP09 HF69 VB6.5 CAA RADE CDC
|
erstellt am: 23. Feb. 2010 15:07 <-- editieren / zitieren --> Unities abgeben: Nur für AL-Fonse
*g* Ja, ich gebe zu getrickst zu haben, die Zeile Code:
Set hybridBody2 = hybridBody1.HybridBodies.Add()
nimmt er natürlich nicht auf, das hatte ich einfach von der normalen Erzeugung abgeleitet, also dass jedes GeoSet auch GeoSets enthalten kann und die genauso hinzugefügt werden, wie im PartDesign.------------------ Mit freundlichen Grüßen, Henry Schneider alias Lila Es gibt einen ewigen Wettkampf zwischen der Natur und den Ingenieuren: Die Ingenieure versuchen, immer idioten-sicherere Systeme zu bauen, die Natur versucht, immer bessere Idioten zu bauen Xing Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |