---

Hallo Forum,

ich habe ein Problem ich möchte eine Linie selektieren, eigentlich habe ich die schon vor dem Start des Makros selektiert aber über Selection und count habe ich leider immer 0.

Die Selektion brauche ich um aus der Linie dann die Richtung auszulesen, wollte ich mit GetDirection machen.

Hat jemand vielleicht schon ein Makro dafür oder weiß jemand Rat?

mfg thomas

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

---

TAG!

Irgendwie schreibt hier niemand was zu unseren Einträgen!

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

---

zu meinen leider auch nicht.

thema selection:

versuch mal
sub catmain()
dim selection1 as object
Set selection1 = catia.activeDocument.selection
InputObjectType(0) = "AnyObject"
Status = Selection1.SelectElement2(InputObjectType, "Please Select Line...", True)
selection1.endselectelement
msgbox selection1.count
end sub

getdirection hab ich noch nicht gebraucht

Hoff' s'hilft
Ciao
Max

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

---

Dim inputobjecttype(0)
fehlt noch fällt mir da grad auf.

bei bedarf kann
inputobjecttype(0) = "Edge"        '(oder "Line" (?)) sein.
http://ww3.cad.de/foren/ubb/Forum137/HTML/000247.shtml
ist ein Beitrag mit vielen Filter Beispielen. (immer gut zu gebrauchen)

selection1.count sollt dann bei einer ausgewählten Linie gleich 1 sein.

[Diese Nachricht wurde von MaxZ am 10. Jun. 2005 editiert.]

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

---

Hallo,

hat mir leider nicht weitergeholfen, dass Makro will nicht laufen.

Trotzdem vielen dank

mfg thomas

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

---

'deine selectierte line. wenn du die line aufm screen clickst,
'bekommst du ein edge element, wenn du die line
'entweder "einfensterst", oder im tree selectierst, becommst du ein
'line element
Set my_sel = CATIA.ActiveDocument.Selection

'sucht in der selection die selectierten und uebergeordneten objecte
'nach linien ab, du kannst also entweder die edge aufm screen, oder
'die line im tree selectieren
Set my_line = my_sel.FindObject("CATIAHybridShapeLine")

'das array fuer den richtungs vector
Dim my_direction(2)

'tut die drei magischen zahlen ins array
my_line.GetDirection my_direction

ich hab mit was der user wie selektiert, dauernd stress, weil man eben wissen muss, ob im tree oder aufm screen selectiert wird.
weiterhin funktionieren alle meine get- und set- methoden in VBA nur, wenn die objecte nicht specifiziert sind, also
"dim my_line" anstelle von "dim my_line as hybridshapeline"
ich glaub das gilt auch fuer
"dim my_direction(2)" anstelle von "dim my_direction(2) as double"

liebe gruesse,
Gregor

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

---

richtungsvektor.gif

HAllo Zusammen,
dieser Beitrag ist zwar schon sehr alt, aber er interessiert mich gerade sehr.
Ich muß aus einem CATPart mehrer Richtungsvektoren auslesen.
Zwar kann ich jeden Vektor mit der Funktion "Element messen" bzw. "measure item" einzeln selektieren. Bei ca. 100 Messpunkten und zugehörigen Richtungsnormalen aber sehr fehleranfällig, wenn ich jeden einzeln in Excel übertrage.

Gibt es für diesen Zweck denn kein Makro (CATScript) welches automatisch die 100 selektierten Linien als Richtungsvektor zum aktuellen Achsensystem in eine txt oder csv kopiert?
Kann mir jemand helfen? Vielen Dank im Voraus.
Gruß Andreas

------------------
Mr.Kramer

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

---

Moin Andreas,

liegen die Linien in einem GeoSet oder "wild" im Part?

Gruß
Proofin

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

---

Hallo Proofin,
erstmal Danke für die Nachfrage, ich war mir nicht sicher ob überhauptjemand diese alten Beiträge liest.

Zu Deiner Frage:
Die Linien sind alle in einem geoset, also relativ geordnet würde ich sagen.

Ein ähnliches Makro habe ich hier im Forum für das Auslesen der X,Y,Z-Koordinaten von Punkten im Raum gefunden. Dabei müssen auch alle Punkte in einem Set sein. Das Script sieht so aus und funktioniert super! Nur leider bekomme ich keine Vektorrichtung damit (z.B: 0,0,1):

------------------
Mr.Kramer

[Diese Nachricht wurde von anderlkramer am 24. Apr. 2008 editiert.]

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