---

Hallo an alle

ich muß erstmal gestehen das ich ein Neuling in der Programmierung mit VBA bin.

Ich habe jetzt schon viel im Forum gelesen werde aber aus dem nicht schlau.
Wäre nett wenn mir einer weiterhelfen könnte.

Folgendes Problem:
Ich habe mit Selectelement eine Linie (Name : Line3)ausgewählt. Nun möchte ich diese Linie in ein anderes Part(Name: Part3) kopieren und diese dann auf eine Fläche (Name: plane.1) projezieren.
Ich habe das Buch Makroporgrammierung mit V5 zur Hand aber leider steht da nie drin, wie ich mit diesen Objekten weiterarbeiten kann und nicht nur immer MsgBox und Ende.

Vielen Dank schonmal im vorraus.

Grüße

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

---

Hallo,
Sobald das Element selektiert wurde, kannst du es mit Selection.Copy in die Zwischenablage kopieren. Um es nun in eine andere Datei einzufügen, muss eine neue Selection EXPLIZIT FÜR DIESE DATEI erstellt werden -> also NeuesDokument.Selection.
In diesem neuen Dokument greifst du auf das eigentliche Part zu -> also NeuesDokument.Part. Dieses part wird ein die zweite neue Selection eingefügt -> also NeuesDokument.Selection.Add(NeuesDokument.Part)
Um nun das selektierte Element einzufügen wird der befehl "Paste" benutzt -> also NeuesDokument.Selection.Paste

Für die Projektion muss nun ein eintsprechendes HybridShapeProjekt-Objekt erstellt werden (am besten hierfür mal in der Hilfe nachlesen)

Soweit alles in Kürze.
Hier noch ein Beitrag bezüglich Copy&Paste: http://ww3.cad.de/foren/ubb/Forum137/HTML/003024.shtml

SG

Jens Hansen

------------------
Inoffizielle CATIA-Hilfeseite
Private Seite
Xing
Kochbuch - CATIA V5 automatisieren

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

---

Hallo nochmals

ich habe volgendes Problem - hier mal mein Skript aus dem VB-Editor:

Private Sub Eingabe_xy(xy)

   
    ' Auswahl festlegen -----------------------------------------------
   
    Dim Auswahl(1)
       
        Auswahl(0) = "Line"
       
        Auswahl(1) = "Spline2d"
     
    ' Selektion definieren und leeren ---------------------------------
   
    Dim xy As Object
   
    Set xy = CATIA.ActiveDocument.Selection
   
    xy.Clear
   
    ' Selektion vornehmen lassen --------------------------------------
   
    Dim Status As String
   
    Status = xy.SelectElement2(Auswahl, "Bitte wählen:", True)
           
        If Status = "Normal" Then
       
        MsgBox (xy.Item(1).Value.Name)
   
    Else
       
        MsgBox (Abbruch)
   
    End If

End Sub

Das Skript zeigt mir nun den Namen an.
Ich möchte nun Parents der Auswahl wissen und auch den Namen. Praktisch bedeutet das, das ich nicht weis was der Benutzer auswählt, also eine Variable einbauen.
Wie kann ich das Catia vermitteln. Die Auswahl funktioniert ja, aber ich kann mit dem selektiertem nie weiterarbeiten, da ich ja keinen Namen davon kenne.

Bin um jeden Tip dankbar.

Grüße

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

---

moechtest du die parents des ausgewaehlten objektes oder das objekt selbst haben?

ich vermute, du moechtest das ausgewaehlte objekt in einer variablen speichern um damit weiterzumachen, oder?

dies ist recht einfach. momentan sind deine objekte in der selection xy gespeichert. du musst sie also einfach da raus bekommen:

dim o as object
set o = xy.item(1).value

so solltest du auf das erste objekt in deiner auswahl zugreifen koennen.

------------------
no milk today...

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