---

Hallo und guten Morgen,

Eine Frage:
Warum geht das nicht? Wo liegt der Fehler?
(command "-layer" "sp" "" "alle" "" )
(command "-layer" "en" "" Pause "")

in der Befehlszeile händisch eingegeben funktioniert es.
Anschließend will ich zum entsperren nur einen Layer wählen
Bitte um Hilfe.

lg. Martin

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

---

(command "-layer" "SP" "*" "EN" )

oder sowas

(defun C:Alleaussereinen(/ L O LAYER)
  (vl-load-com)
  (if(and(or(/=(setq L(getstring "\nLayer eingeben <von Objekt>: "))"")
            (and(setq O(car(entsel "\nObjekt für Layerwahl: ")))
                (setq L(cdr(assoc 8 (entget O))))
            )
        )
        (tblobjname "LAYER" L)
    )
    (vlax-for LAYER (vla-get-layers(vla-get-activedocument(vlax-get-acad-object)))
      (if(=(strcase(vla-get-name LAYER))(strcase L))
        (vla-put-lock LAYER :vlax-false)
        (vla-put-lock LAYER :vlax-true)
      ) 
    ) 
  )
)

------------------
Also ich finde Unities gut ... und andere sicher auch
---------------------------------------
  - Thomas -          
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

(command "-layer" "sp" "*" "en" Pause "")

------------------
<----- Bitte Systeminfo eintragen, warum siehst du hier.
Wünsche: dyn. Xrefs, Mulitmodel, Halo4Texte, Linientypen überarbeiten (doppellinien) , XREF>VISRETAIN pro XREF, Fehler zwischen Normal MAP Civil beheben...
Schöne Grüsse aus der Steiermark  Bernd P.

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

---

Hallo,
danke für die Hilfe.
Das sperren funktioniert sehr gut. Nur das anschließende entsperren, da kann ich keine Auswahl treffen mit
(command "-layer" "sp" "*" "en" Pause "")

lg. Martin

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

---

Hab oben noch mal was ergänzt ...

------------------
Also ich finde Unities gut ... und andere sicher auch
---------------------------------------
  - Thomas -          
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

Hallo,

Danke für die Hilfe,

Ich muss den Layer auswählen können, nicht den Layernamen eingeben.
Mit (command "-layer" "sp" "*" "en" Pause "") kann ich keine Auswahl treffen.

@ Thomas.
Bei dem Lisp passiert gar nichts.??
Bin übrigens auf Acad 2016 unterwegs.
Vielleicht liegt es daran?

lg. Martin

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

---

Lisp laden .. Befehl mit ALLEAUSSEREINEN aufrufen ...
Layer eingeben <von Objekt>:  Layernamen eingeben oder für Objektwahl einfach ENTER
.. dann Objekt wählen ..... Programm liest Layer vom Objekt aus

Dann werden alle Layer durchlaufen und gesperrt bis auf den gewählten, der wird entsperrt .....

läuft ohne Probs.

kann mir nicht vorstellen, dass sich daran in 2016 was geändert hat .. die adeskler schrauben da eher an Befehlen und ihren Optionen rum

------------------
Also ich finde Unities gut ... und andere sicher auch
---------------------------------------
  - Thomas -          
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

Hallo Thomas,

ich hab sche..... gebaut.  
Natürlich funktioniert es wie gewünscht!

Daaaanke!
lg. Martin

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

---

Eins noch Thomas,

Ich habe bei mir normal bei gesperrten Layern das Fading verändert, damit man sehen kann welche Layer gesperrt sind.
Bei deinem Lisp ist das nicht so.
Warum?
lg. Martin

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

---

liegt am regenerieren danach  .... acad will da nicht so richtig .. ich schau mal wie ich es überreden kann ...

------------------
Also ich finde Unities gut ... und andere sicher auch
---------------------------------------
  - Thomas -          
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

Danke!

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