Autor
|
Thema: Freiformflächen mittels Makro (970 mal gelesen)
|
as-tom Mitglied techn. Zeichner
Beiträge: 117 Registriert: 19.01.2006 Catia V5 R18
|
erstellt am: 18. Mai. 2009 11:22 <-- editieren / zitieren --> Unities abgeben:
Hallo zusammen, ich hab da einmal eine Frage: ist es möglich, dass man Freiformflächen (Net Surface) mittels Makro erzeugen kann? Ich habe z.B. einige Guides und 2 Profiles womit ich nun eine Fläche mittels Net Surface erzeugen kann. Nur kann man das auch mit einem Makro automatisieren. Wenn ich über Makro - Star Recording es versuche, funktioniert das nicht. Übrigens: ich habe keine Ahnung von Makro-Programmierung Vielen Dank. Thomas Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Marcinator Mitglied Mechatroniker
Beiträge: 9 Registriert: 20.04.2009 CATIA V5 R16 Windows 2000
|
erstellt am: 23. Mai. 2009 03:35 <-- editieren / zitieren --> Unities abgeben: Nur für as-tom
Hi Tom, ich muss zugeben das ich selbst ein extremer Neuling bin, aber es ist auf jeden Fall möglich mittels Makros Flächen (allerdings weiß ich net was Freiformflächen sind)zu erstellen. Ich hab leider grad kein konretes Beispiel zur Hand, nur n paar Kot-Schnipsel^^ aber prinzipiell geht es über diesen Weg (ich habe zuvor schon eine 2D-Linie erzeugt), diese wird dann extrudiert: Code: Dim hybridShapeFactory1 As Factory Set hybridShapeFactory1 = part1.HybridShapeFactoryDim hybridShapePlaneExplicit1 As AnyObject Set hybridShapePlaneExplicit1 = originElements1.PlaneXY Dim hybridShapeDirection1 As HybridShapeDirection Set hybridShapeDirection1 = hybridShapeFactory1.AddNewDirection(reference1) Dim tiefe As Double tiefe = 3 Dim body1 As Body Set body1 = bodies1.Item("Teil") Dim reference40 As Reference Set reference40 = part1.CreateReferenceFromObject(sketch1) Dim hybridShapeExtrude1 As HybridShapeExtrude Set hybridShapeExtrude1 = hybridShapeFactory1.AddNewExtrude(reference40, tiefe, 0, hybridShapeDirection1) body1.InsertHybridShape hybridShapeExtrude1 part1.InWorkObject = hybridShapeExtrude1 part1.Update
Wie gesagt, hier wir nur eine Fläche erzeugt. Ich hoffe das hilft dir weiter, wenn nicht meld dich nochmal. Wenn ich dir helfen kann, werd ichs tun. Grüße Marc [EDIT]: Was mir grad noch kommt: Manchmal ist es hifreich nicht das gesamte Makro aufzuzeichnen, sondern nur Stück für Stück. Bei mir wird bei einer kompletten Makroaufzeichnung oft ein Teil nicht aufgezeichnet. Wenn ich aber nur einzelne Schritte aufzeichne funtzt. [Diese Nachricht wurde von Marcinator am 23. Mai. 2009 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
as-tom Mitglied techn. Zeichner
Beiträge: 117 Registriert: 19.01.2006 Catia V5 R18
|
erstellt am: 25. Mai. 2009 06:55 <-- editieren / zitieren --> Unities abgeben:
Hallo Marc, erst mal vielen Dank, dass Du Dich gemeldet hast. Also Freiformflächen erzeugst Du mit der Funktion FreeStyle. Dort kann man NetSurfaces oder StylingSurfaces erzeugen. Das Problem ist: wenn ich meine Grundarbeit erledigt habe, um dann nur noch die Flächen mit einem dieser Befehle aufziehen möchte, funktioniert dass nicht mit einer Makro-Aufzeichnung. Die Flächen, rein Catia mäßig, funktionieren schon, nur eben nicht wenn ich die Vorgehensweise mit Makro-Recording-Start aufzeichnen möchte. Gruss, Thomas Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| Anzeige.:
Anzeige: (Infos zum Werbeplatz >>)
|