Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  CATIA V5 Programmierung
  2D-Komponente

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:  2D-Komponente (494 mal gelesen)
joerg.m
Mitglied



Sehen Sie sich das Profil von joerg.m an!   Senden Sie eine Private Message an joerg.m  Schreiben Sie einen Gästebucheintrag für joerg.m

Beiträge: 17
Registriert: 05.07.2005

erstellt am: 27. Jul. 2005 10:24    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo zusammen,

weiß jemand von Euch wie man per Makro feststellen kann, aus welchen konkreten Objekten (Linie, Kreis...) sich eine 2D-Komponente zusammensetzt? Vielen Dank!

Gruß,
Jörg

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

mkim
Mitglied


Sehen Sie sich das Profil von mkim an!   Senden Sie eine Private Message an mkim  Schreiben Sie einen Gästebucheintrag für mkim

Beiträge: 5
Registriert: 04.07.2005

erstellt am: 28. Jul. 2005 15:46    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für joerg.m 10 Unities + Antwort hilfreich

Zitat:
Original erstellt von joerg.m:
Hallo zusammen,

weiß jemand von Euch wie man per Makro feststellen kann, aus welchen konkreten Objekten (Linie, Kreis...) sich eine 2D-Komponente zusammensetzt? Vielen Dank!

Gruß,
Jörg


hi joerg,

hier ein bisschen beispielcode:
die Benamsung ( Blatt.1 und View.4 aus Makrorekorder ) solltest du entsprechend anpassen...

mkim


Sub CATMain()
   
    Dim drawingDocument1 As Document
    Set drawingDocument1 = CATIA.ActiveDocument
   
    Dim drawingSheets1 As DrawingSheets
    Set drawingSheets1 = drawingDocument1.Sheets
   
    Dim drawingSheet1 As DrawingSheet
    Set drawingSheet1 = drawingSheets1.Item("Blatt .1")
   
    Dim drawingViews1 As DrawingViews
    Set drawingViews1 = drawingSheet1.Views
   
    Dim drawingView1 As DrawingView
    Set drawingView1 = drawingViews1.Item("View.4")
   
    drawingView1.Activate
   
    Dim drawComp As DrawingComponent
    Set drawComp = drawingView1.Components
   
    For i = 1 To drawComp.count
        Set comp = drawComp.Item(i)
        Set compRef = comp.compRef
        Set geometricElements = compRef.geometricElements
       
        MsgBox("Komponente: " & comp.Name & " von " & components.Count)
       
        For k = 1 To geometricElements.count
            Set geo = geometricElements.Item(k)
           
            MsgBox("Komponente: " & geo.Name )
            Select Case geo.GeometricType
                Case catGeoTypeLine2D
                   
                    MsgBox (" Bin vom Typ: Line2D " )
                Case catGeoTypeCircle2D
                    MsgBox (" Bim vom Typ: Circe2D " & geo.radius)
                ' weitere Typen ...
            End Select
        Next
    Next

End Sub

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

joerg.m
Mitglied



Sehen Sie sich das Profil von joerg.m an!   Senden Sie eine Private Message an joerg.m  Schreiben Sie einen Gästebucheintrag für joerg.m

Beiträge: 17
Registriert: 05.07.2005

erstellt am: 28. Jul. 2005 18:58    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Wunderbar, vielen Dank!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz