---

2024-05-06_10h58_52.png

Es gibt den super Befehl _COPYTOLAYER resp. AUFLAYKOP mit dem ich die bereits markierten Elemente auf einen neuen Layer kopieren kann. Den neuen Layer kann ich direkt im Befehl erstellen lassen. Per Dialogbox oder per Kommandozeile (_-COPYTOLAYER resp. -AUFLAYKOP). 

https://help.autodesk.com/view/ACD/2024/DEU/?guid=GUID-4327BDE7-58FB-4199-93D4-ECD356C0E89E

So weit so gut. Leider gibt es aber keinen Befehl, welcher genau das gleiche kann, aber die markierten Elemente auf einen neuen Layer VERSCHIEBT 
Dieser Befehl würde dann also MOVETOLAYER resp. AUFLAYSCHIEBEN heissen.

Vielleicht kennt jemand von Euch ein LISP, welches genau das kann?

Besten Dank und schöne Woche 

Gruss aus der Schweiz
neo

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

---

Hallo Neo (und nicht immer dem weißen Kaninchen hinterher  ),

einfach STRG + 1 bzw. CTRL + 1 drücken ... toggelt das Erscheinen des Eigenschaftsfensters.

Dort in der zweiten Zeile von oben wird der Layer der aktuell markierten Elemente angezeigt ... liegen sie auf unterschiedlichen Layern steht dort *VARIIERT* ... darauf linksklicken und aus dem Dropdown-Menü den gewünschten Ziellayer auswählen.

Okay, das mit dem Verschieben auf einen noch nicht existierenden Layer würde so nicht funktionieren, aber im "Notfall" zum Parken der selektierten Elemente einen selten benutzten Layer auswählen - eventuell DEFPOINTS - und den gewünschten Layer im Nachgang erstellen (oder besser gleich vorher  ). Dann per Schnellauswahl (oben rechts im Eigenschaftsfenster) im betroffenen Bereich der Zeichnung die geparkten Elemente erneut auswählen und auf den neu erstellten Layer verschieben.

Und falls das häufiger notwendig ist, gleich in der eigenen Zeichnungsvorlage einen eigens dafür gedachten Layer anlegen ... "_ Parken" oder so ... der prinzipiell immer (leer) in der Zeichnung verbleibt oder vor dem "finalen" Abspeichern der Zeichnung mittels BEREINIG bzw. _+purge aus der Zeichnung bereinigt wird.

Grüße
Gernot

[Diese Nachricht wurde von ArCADe-Spieler am 06. Mai. 2024 editiert.]

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

---

Hallo neo4matrix,

wenn du nach deinem _COPYTOLAYER resp. AUFLAYKOP direkt den Befehl WAHL startest und dann V (für Vorher) eingibst sollten alle deine "alten" Objekte wieder ausgewählt sein. Nun kannst du diese einfach löschen.

Bei mir klappts so.

Vor dem Testen SPEICHERN nicht vergessen.

Gruß
CAD-Cloudy 

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

---

Kopieren und Löschen erzeugt neue Objekte und löscht die bestehenden Objekte.
Bei Datenbankanbindungen ein mögliches Problem, für die Performance  bei größeren Datenmengen auch ungünstig.
Warum nicht einfach die Eigenschaften ändern mit dem
Befehl: EIGÄNDR Layer

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

Udo Hübner
www.CAD-Huebner.de

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

---

Zitat:

---

Original erstellt von CAD-Huebner:
...
Warum nicht einfach die Eigenschaften ändern mit dem
Befehl: EIGÄNDR Layer

---

Weil einen neuen Layer erstellen während des Befehls mit EIGÄNDR nicht möglich ist.

Zitat:

---

Original erstellt von neo4matrix:
...auf einen neuen Layer kopieren kann. Den neuen Layer kann ich direkt im Befehl erstellen lassen.

---

Das war doch der Wunsch, oder hab ichs falsch verstanden?

Und ja, das ist dann nicht optimal:

Zitat:

---

Bei Datenbankanbindungen ein mögliches Problem, für die Performance  bei größeren Datenmengen auch ungünstig.

---

Gruß
CAD-Cloudy 

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

---

Ist ja kein Problem einen neuen Layer im Makro anzulegen : Befehl: -LAYER Option Neu

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

---

Zitat:

---

Original erstellt von CAD-Cloudy:

Weil einen neuen Layer erstellen während des Befehls mit EIGÄNDR nicht möglich ist.

---

Such' mal im Forum nach SSMODENT. Das ist ein Lisp von mir, mit dem Du für jedes Objekt jeden beliebigen DXF-Gruppencode ändern kannst. Weil der DXF-Gruppencode für Layer die 8 ist, erfolgt der Aufruf so:

(ssmodent <ename> 8 "NeuerLayerName")

Der neue Layer muss vorher nicht existieren. Und die Enamen Deiner vorab ausgewählten Elemente kriegst Du mit der Lisp-Funktion SS->LIST aus (ssget "i"). Das SS->LIST ist das hier:

Code:

---

(defun ss->list (sset / eset counter)
  (setq counter 0)
  (if (= 'PICKSET (type sset))
    (repeat (sslength sset)
      (setq eset (cons (ssname sset counter) eset)
            counter (1+ counter)
      )
    )
  )
  eset
)

---

Wenn Du die paar Lisp-Funktionen geladen hast, lautet Dein Aufruf auf dem Befehlsprompt dann also nur noch:

(mapcar '(lambda (en) (ssmodent en 8 "NeuerLayerName")) (ss->list (ssget "i")))

Du kannst dann aber auch viele andere Dinge ändern, wie die Farbe der Elemente, oder Anfangspunkte von Linien, oder Einfügepunkte von Blöcken, oder die referenzierte Blockdefinition uswusf..

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