Hot News:

Mit Unterstützung durch:

   Foren auf CAD.de (alle Foren)
  Lisp
  vorhandene XREF auf Layer XREF legen

  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:
Thema geschlossen  Thema geschlossen!
Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
Autor Thema:  vorhandene XREF auf Layer XREF legen (582 mal gelesen)
fmfm
Mitglied
Facility Management


Sehen Sie sich das Profil von fmfm an!   Senden Sie eine Private Message an fmfm  Schreiben Sie einen Gästebucheintrag für fmfm

Beiträge: 258
Registriert: 18.10.2016

AutoCad 2019

erstellt am: 17. Mai. 2018 11:15    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities
Hallo zusammen

Ich möchte gerne bestehende Externe Referenzen auf einen bestimmten Layer (Layername: XREF) legen.

Ich hab n cooles Tool gefunden wie ich die XRefs auf den XRef namen Legen kann:

https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/lisp-to-change-xref-layer-with-xref-name/td-p/2532920


Code:
(defun dxf (i a) (cdr (assoc i a)))
(defun c:lxr ( )
(setq ss (ssget "x" '((0 . "INSERT"))))
(setq cnt 0)
(setq xrs (list))
(while (< cnt (sslength ss))
(setq en (ssname ss cnt))
(setq ed (entget en))
(setq bn (dxf 2 ed))
(if (/= 0 (logand 12 (dxf 70 (tblsearch "BLOCK" bn))))
(progn
(setq xp (dxf 1 (entget (tblobjname "block" bn))))
(command "-layer" "new" bn "")
(command "chprop" en "" "layer" bn "")
)
)
(setq cnt (1+ cnt))
)
(princ)
)


Kann man die Lisp umwandeln so das alle XREFs auf den Layer XREF gelegt werden?

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

Projektingenieur / Projektentwickler / Projektleiter Windenergie (w/m/d)

Nur wenn Ökologie und Ökonomie gemeinsam betrachtet werden, können Forschung und Innovation sowohl der Umwelt als auch der Wirtschaft dienen. Unser Unternehmen, die ÖKOTEC Windenergie GmbH mit Sitz in Berlin, ist Dienstleister im Bereich Projektentwicklung für Windenergiestandorte. Darüber hinaus bieten wir auch Planungsunterstützung im Bereich PV-Freiflächenanlagen an. Unser Leistungsspektrum umfasst ...

Anzeige ansehenBusiness Development
cadffm
Moderator
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 21533
Registriert: 03.06.2002

Alles

erstellt am: 17. Mai. 2018 11:16    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für fmfm 10 Unities + Antwort hilfreich

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag öffnen | Archivieren/Bewegen | Beitrag melden!
Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz