| |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für CATIA & Co. |
| |
 | KISTERS 3DViewStation optimiert die Lizenzverwaltung für ihre Kunden, eine Pressemitteilung
|
Autor
|
Thema: Body with Link ==> Link umhängen (1864 mal gelesen)
|
never33 Mitglied

 Beiträge: 12 Registriert: 11.04.2009 Win Xp 32bit Catia V5 R19 SP3
|
erstellt am: 29. Dez. 2010 11:53 <-- editieren / zitieren --> Unities abgeben:         
Hallo, habe den Forum schon durchgescahut finde leider keine Hinweis auf mein Problem, habe einen Körper mit Link erzeugt nun möchte ich diesen Link auf einen anderen Körper per Makro umändern. Gruß never Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann Moderator Konstrukteur
       
 Beiträge: 12054 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 29. Dez. 2010 12:59 <-- editieren / zitieren --> Unities abgeben:          Nur für never33
Servus Bitte Systeminfo ausfüllen. Wie würdest du das "umhängen" von Hand machen? Falls es nur mit ersetzen geht, ist das AFAIR nicht mit einem Makro möglich. Alternativ könntest du den verlinkten Body mit einer Boole'schen Operation (Zusammenbauen oder Hinzufügen) verbauen. Dann solltest du einfach den Body unter der Boole'schen Operation ändern können. Gruß Bernd
------------------ Warum einfach, wenn es auch kompliziert geht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
never33 Mitglied

 Beiträge: 12 Registriert: 11.04.2009 Win Xp 32bit Catia V5 R19 SP3
|
erstellt am: 29. Dez. 2010 13:06 <-- editieren / zitieren --> Unities abgeben:         
Hallo bernd, im Catia geht es wiefolgt 1. Copy/PasteSpecial ==> mit Link 2. Rechte Maustast ==> Solid Objekt ==> Definition ==> neuer Body auswählen Körper referenziert nun auf den neuen Körper Gruß never Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann Moderator Konstrukteur
       
 Beiträge: 12054 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 29. Dez. 2010 14:46 <-- editieren / zitieren --> Unities abgeben:          Nur für never33
Servus Gemäß Doku gibt es die Methode "SourceElement" um die Quelle des Links auszulesen, leider ist nicht zum neu setzen beschrieben. Gruß Bernd ------------------ Warum einfach, wenn es auch kompliziert geht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
never33 Mitglied

 Beiträge: 12 Registriert: 11.04.2009 Win Xp 32bit Catia V5 R19 SP3
|
erstellt am: 29. Dez. 2010 14:49 <-- editieren / zitieren --> Unities abgeben:         
|
bgrittmann Moderator Konstrukteur
       
 Beiträge: 12054 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 29. Dez. 2010 14:52 <-- editieren / zitieren --> Unities abgeben:          Nur für never33
Servus AFAIK geht ein Replace nicht direkt. Entweder wie beschrieben mit einer Boole'schen Operation oder ggf mit einem Translate oder ähnlichem (siehe hier) Gruß Bernd ------------------ Warum einfach, wenn es auch kompliziert geht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
never33 Mitglied

 Beiträge: 12 Registriert: 11.04.2009 Win Xp 32bit Catia V5 R19 SP3
|
erstellt am: 29. Dez. 2010 14:59 <-- editieren / zitieren --> Unities abgeben:         
|
bgrittmann Moderator Konstrukteur
       
 Beiträge: 12054 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 14. Sep. 2011 12:10 <-- editieren / zitieren --> Unities abgeben:          Nur für never33
Servus Um eine Nachfrage nach dem Austauschen eines Körpers in einer Booleschen Operation (per PM) zu beantworten, anbei ein Beispiel: Code: Sub CATMain()Dim partDocument1 As PartDocument Set partDocument1 = CATIA.ActiveDocument Dim part1 As Part Set part1 = partDocument1.Part Dim bodies1 As Bodies Set bodies1 = part1.Bodies Dim body1 As Body Set body1 = part1.MainBody Dim body2 As Body Set body2 = bodies1.Item("TEST") Dim oRef As Reference Set oRef = part1.CreateReferenceFromObject(body2) Dim shapes1 As Shapes Set shapes1 = body1.Shapes Dim assemble1 As Assemble Set assemble1 = shapes1.Item("Zusammenbauen.1") assemble1.SetOperatedObject oRef part1.Update End Sub
Gruß Bernd------------------ Warum einfach, wenn es auch kompliziert geht. [Diese Nachricht wurde von bgrittmann am 14. Sep. 2011 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |