|
Autor
|
Thema: Detail mit Expose vom Katalog trennen (2661 mal gelesen)
|
ledneb
Mitglied
ingeieur
   Beiträge: 8
Registriert: 21.10.2006
|
erstellt am: 21. Okt. 2006 15:42  <-- editieren / zitieren -->   Unities abgeben:          
Hallo, ich möchte in einer Zeichung die Verknüpfungen von 2D-Komponenten zur Bibliothek mit mittels Expose trennen. Laut V5Automation Hilfe stehen hierfür die beiden Funktionen
ExposeCompRef und
ExposeCompRefInSheet
zur Verfügung. Mit ExposeCompRef funktioniert das ganze auch, mit ExposeCompRefInSheet leider nicht. Das Makro liefert als Fehlermeldung "Typen unverträglich". MyComponent.ExposeCompRefInSheet MyDetailSheet Weiss jemand wie der Parameter MyDetailSheet in der Methode ExposeCompRefInSheet anzugeben ist? Mit dem Namen des Detailsheets funktioniert es zumindest nicht. Vielen Dank für eure Unterstützung
Marcus Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Bobby_Joe2001
Mitglied
Konstrukteur
Beiträge: 81
Registriert: 15.01.2006
|
erstellt am: 22. Okt. 2006 13:16 <-- editieren / zitieren --> Unities abgeben: Nur für ledneb 
Hallo! Das ist eigentlich ganz einfach. "MyDetailSheet" ist ein Objektverweis auf ein schon vorhandenes Detailblatt. Code:
Sub CATMain()
'Blatt, auf dem das Detail eingefuegt wurde
Set MySheet = CATIA.ActiveDocument.Sheets.Item(1)
'Das Detailblatt
Set MyDetailSheet = CATIA.ActiveDocument.Sheets.Item(2) 'View auf dem das Detail eingefuegt wurde
'Hier Index 1 = Mainview = Blatt
Set MyView = MySheet.Views.Item(1) 'Das Detail
Set My2DComponent = MyView.Components.Item(1)
'2D-Komponente zugaenglich machen (Expose)
'Danach wird das Detail-Blatt aktiviert!
My2DComponent.ExposeCompRefInSheet MyDetailSheet
'Wieder Blatt 1 aktivieren
MySheet.Activate
End Sub
Gruß ------------------
Du musst die Leute einmal richtig ärgern, dann wirst du endlich ernst genommen.
Konrad Adenauer Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ledneb
Mitglied
ingeieur
Beiträge: 8
Registriert: 21.10.2006
|
erstellt am: 22. Okt. 2006 20:48 <-- editieren / zitieren --> Unities abgeben:
|
reipet
Mitglied
Beiträge: 115
Registriert: 12.10.2004 Intel Xeon 4*2,3GHz
6 GB RAM, Quadro FX 4800
Windows Vista 64bit
R19SP3 HotFix34
|
erstellt am: 30. Jun. 2010 14:44 <-- editieren / zitieren --> Unities abgeben: Nur für ledneb
Hallo, ich klink mich mal hier ein. Hab dieses Makro probiert um die 2D Components zu exposen. Allerdings bräuchte ich noch ne Änderung und es läuft auch trotzdem nicht. Das Makro müsste eine Abfrage haben, ob bereits ein Detail-Sheet vorhanden ist. Anstonsten soll eins erstellt werden und dann alle Komponenten exposed/exploded werden. Kann mir da jemand helden, das Makro bleibt jetzt auch immer beim Punkt ´Das Detail hängen ------------------
CATIA = Close And Try It Again Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann
Moderator
Konstrukteur
    
Beiträge: 11780
Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 30. Jun. 2010 22:06 <-- editieren / zitieren --> Unities abgeben: Nur für ledneb
Servus Was hast du den vor? Wenn du alle Components "exposen" willst könntes so gehen: -> Schleife über alle Sheets -> (verschachtelt) Schleife über alle Views -> (verschachtelt) Schleife über alle Components -> "expose" oder -> Schleife über alle Sheets -> über Suche alle Components selektieren -> Schleife über die Selektion -> "expose" Gruß
Bernd
------------------
Warum einfach, wenn es auch kompliziert geht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de (alle Foren)
| 
