---

Wollte eine Skizze mit einem geschlossenem Kurvenzug im GSD joinen.

Von Hand kann man ein Join mit nur einem Element problemlos
erstellen. Bei diesem ich mir dann auch mit Measure Item die Kurvenlänge ausmessen
lassen.

Will ich das ganze per Makro realisieren muss ich jedoch zwei
Referenzelemente für das Join wählen. Ich kann zwar das zweite
Element hinterher mit removeelement entfernen, jedoch
kommt bei der Längenmessung des Joins immer 0mm raus.

Wer weiß Rat?

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

---

Sollte an Stelle des 2. Elements auch mit Nothing funktionieren

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

---

Du kannst dem Join auch beides Mal die gleiche Referenz geben  

Code:

---

Set Join = hybridShapeFactory.AddNewJoin(Ref, Ref)

---

[Diese Nachricht wurde von theshadog am 08. Jun. 2009 editiert.]

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

---

Bild.jpg

Hallo Zusammen,

ich würde JOIN mit nur einem Element erstellen.

Folgede Code:

Code:

---

Set hybridShapeAssemble1 = hybridShapeFactory1.AddNewJoin(ref, ref)

---

wie kann ich die eine enfernen? (Siehe Bild)

Vielen Dank im Voraus

[Diese Nachricht wurde von imation1999 am 17. Aug. 2012 editiert.]

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

---

Servus
Gemäß Dock sollte es über zB:

Code:

---

hybridShapeAssemble1.RemoveElement 2

---

gehen das 2. Element zu entfernen (ggf mit Klammer um den Index).

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

Danke Bernd!

Weißt Du vielleicht, wie ich die Richtung des Join festlegen kann?

[Diese Nachricht wurde von imation1999 am 17. Aug. 2012 editiert.]

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

---

Servus
Schau bitte in die "V5Automation.chm".
Viellicht gibt es eine Methode "Invert".

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

Bild2.jpg

Hallo Bernd,
vielen Dank für Deine Antwort.

Code:

---

hybridShapeAssemble1.Invert = True

---

Ich habe das gefunden, aber wie kann ich das auslesen, ob meine "curve"  rechts- oder linksdrehend ist?

Vielen Dank im Voraus

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

---

Servus
IMHO kann man nicht direkt den Richtungssinn einer Kontur herausfinden.
Ggf kann man dazu zwei Punkte auf der Kontur erzeugen (auf Kurve im Verhältnis) und dann eine Messung zwischen diesen dazu auswerten.

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

hallo Bernd,

könntest Du bitte etwas genauer angeben, was ich messen soll, und wie kann ich die Richtung hinkriegen?

Vielen Dank im Voraus

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

---

Servus
Meine Idee dazu:
Anfangspunkt der Kurve mit AddNewPointOnCurveFromPercent erstellen. Tangentiale Linie mit AddNewLineTangency. Dann die Richtung der Linie auswerten.
Stellt sich aber noch die Frage, welche Richtung der Kurve die Richtige für dich ist.

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

Morgen Bernd,

vielen Dank für Deine Antwort.
Ja, ist mir klar. Mit Tangential Line sehe ich sofort die Richtung der Kurve.
Aber: ich brauche ein JOIN (nur mit ein Element, siehe Code), was immer rechtsdrehend ist. Kann man das irgendwie automatisieren?

Code:

---

For i = 1 To UserSelection.Count
  Set ref = part1.CreateReferenceFromObject(UserSelection.Item(i).Value)
  Set hybridShapeAssemble1 = hybridShapeFactory1.AddNewJoin(ref, ref)
  hybridShapeAssemble1.RemoveElement 2

  if      '------da brauche ich etwas Hilfe
   then
   hybridShapeAssemble1.Invert = True
  end if
  hybridBody1.AppendHybridShape hybridShapeAssemble1
Next

---

[Diese Nachricht wurde von imation1999 am 23. Aug. 2012 editiert.]

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

---

Servus
Was heißt rechtsdrehend (kannst du das aus einer Tagentialrichtung bestimmen)?
Dann musst du eben nach der erzeugen des Joins die Richtung bestimmen (zB wie beschrieben) und falls erforderlich den Join invertieren.

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

Bild3.jpg

Mein JOIN soll immer von "x" bis "y" laufen.

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

---

Guten Tag,

ich würde im Marko zuerst den Join (wie oben bereits mehrfach beschreiben) erzeugen. Anschließend einen Extremum-Punkt in Y-Richtung erzeugen (also ist der "oben" wie im Bild). Darauf folgend eine Tangentiale Linie, auf welcher man einen Punkt mit Ratio 0 UND ratio 1 macht. Ist der Ratio1 Punkt (also ende der Linie) weiter links als der Ratio 0, ist klar das die Linie nach links geht.
(Dazu die Coordinaten Messen. Suche nach SPAworkbench!! Falls du nicht mit der Axis1 arbeitest ist es etwas komplizierter, da du die coordinaten halt noch umrechnen musst. Falls nötig einfach schreiben. Habe iregdnwo son code rumfliegen... muss ich nur suchen!)
Dann je nachdem was gewollt ist die Invert-Eigenschaft aktiv schalten!

mfg

gladly

[Diese Nachricht wurde von gladly am 27. Aug. 2012 editiert.]

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

---

Morgen gladly,

Vielen Dank für Deine Antwort.
Ich werde auch so versuchen.

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