---

Hallo Zusammen,

gibt es einen Befehl mehrere Parallelle Linien mit einem Auswahlfenster zu verbinden.
________  ____
______  ______
_______  _____

so dass ich drei Linien erhalte die jeweils nur aus einem Start und Endpunkt bestehen.
Mit den Befehlen pedit, mpedit, amjoin, pljoin, heilen.lsp schaffe ich das nicht.

Danke und Gruß Wolfgang

------------------
"Früher war die Zukunft besser"
-Karl Valentin-

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

---

Versuch mal _join, gibt es ab ACAD 2006.
____________
Markus

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

---

Hallo Markus,

damit kann ich jede Linie einzeln verbinden aber nicht alle auf einmal, oder täusche ich mich?

Danke und Gruß Wolfgang

------------------
"Früher war die Zukunft besser"
-Karl Valentin-

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

---

Stimmt Wolfgang. Ist aber die einzige mir bekannte Möglichkeit.
____________
Markus

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

---

Hallo Wolli

_pedit
Polylinie wählen oder [mehrere Objekte]:
O für mehrere Objekte => Aufwahlfenster um Polylinien und v für Verbinden. Evtl. kannst du auch Fuzzyabstand eingeben, wenn benötigt wird.

Gruß Anja

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

---

Hallo Anja,

ich schaff das nicht, bei mir springt acad nach dem Fuzziabstand wieder in die Optionen und egal was ich da auswähle es wird nichts verbunden.

Danke und Gruß Wolfgang

------------------
"Früher war die Zukunft besser"
-Karl Valentin-

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

---

Hallo,

spiel mal ein bißchen mit dem Fuzzyabstand herum.
Dann klappt das auch :-))

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

---

Ich mach es wie folgt:
_pedit
O für Objekte
Fenster von rechts nach links über die Linien
Return
Linien in Polylinien umwandeln j Return
V für verbinden
Fuzzy-Abstand 10 Return (die Lücke ist ca. 5mm)
ACAD meldet : 0 Segment(e) der Polylinie hinzugefügt
in der Befehlszeile kann ich erneut die Optionen auswählen [Schließen/Öffnen...
mit Verbinden komme ich dann erneut zum Fuzzyabstand usw...
Mit Return verlasse ich die Optionen und nichts hat sich an meinen Linien geändert.
Was mach ich falsch?

Danke und Gruß Wolfgang

------------------
"Früher war die Zukunft besser"
-Karl Valentin-

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

---

gib mal _O für Objekte ein ( mit unterstrich davor)

------------------
- Thomas -
"Du bist einen uns unbekannten Weg in eine andere Form des Seins gegangen. - Wir sehen uns wieder in deinem Paradies! - Tschüß Axel.."

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

---

bei Fuzzyabstand Verbindungstyp "Hinzufügen" wählen (bei Dehnen funktioniert es bei mir auch nicht  ), dann Fuzzy-Abstand. Achtung, wenn der Abstand zu groß angegeben ist verbindet er die parallele Linie darunter/darüber mit.

Edit:
Verbindungstyp Dehnen funktioniert wenn die Linien nicht in einer Flucht liegen

[Diese Nachricht wurde von Cadanusch am 07. Mrz. 2006 editiert.]

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

---

@Thomas,
_O wird nicht akzeptiert

@Anja
mit dem geänderten Verbindungstyp versucht ACAD alle linien irgendwie zu verbinden was im meinem Fall zu Schlangenlinien führt.
Es sollen aber nicht alle Linien irgendwie miteinander verbunden werden sondern nur die die in einer Flucht liegen.
Als Ziel eben 3 Linien ohne Lücke.
Das geht wohl nicht.

Vorher:
___ ____
__ _____
____ ___

Nachher:
________
________
________

Danke und Gruß Wolfgang

------------------
"Früher war die Zukunft besser"
-Karl Valentin-

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

---

Ab AutoCAD 2006 sollte es so gehen:

Code:

---

(DEFUN C:VERBINDEALLE( / aw anz)
  ; Erstellt für Beitrag
  ; http://ww3.cad.de/foren/ubb/Forum54/HTML/013390.shtml
  ; Udo Hübner alias CAD-Huebner
  (PROMPT "\nVerbinde alle kolinearen Linien:")
  (IF (SETQ aw (SSGET '((0 . "LINE"))))
    (PROGN
      (SETQ anz (SSLENGTH aw))
      (WHILE (>= (SETQ anz (1- anz)) 0)
        (IF (SSNAME aw anz)
          (COMMAND "_JOIN" (SSNAME aw anz) aw "")
        )
      )
    )
  )
) 

---

------------------
Mit freundlichem Gruß

Udo Hübner

[Diese Nachricht wurde von CAD-Huebner am 07. Mrz. 2006 editiert.]

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

---

Danke allen,
besonders Udo, danke für das Lisp, genau das was ich wollte.

Gruß Wolfgang

------------------
"Früher war die Zukunft besser"
-Karl Valentin-

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