---

Hallo Lisp-Gemeinde,
ich habe mal wieder ein Problem, bei welchem ich auf eure Hilfe angewiesen bin.
Ich möchte gerne einen ssget-Aufruf so gestalten, dass ich sowohl den Objekttyp als auch die Eigenschaften wie Layer, Blockname usw. übergeben kann.
z.B.
(setq i 0 ObjType "INSERT" PropList (list (list 8 "LAY1") (list 2 "BLOCK1")))
(ssget
(list (cons 0 (strcase ObjType))
  (repeat (length PropList)
  (cons (nth 0 (nth i PropList)) (nth 1 (nth (1- (setq i (1+ i))) PropList)))
  )
)
)
Leider nimmt die Funktion bei der Ausführung immer nur den ersten Listeneintrag aus PropList - also es werden entweder Blöcke gleichen Namens oder gleichen Layers geliefert, je nachdem welcher Wert zuerst in der Liste steht. Wo liegt hier mein Fehler?
Vielen Dank schon mal im Voraus!
Uwe

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

---

in meinen Augen ein komischer Konstrukt, aber nunja :

(setq i 0 ObjType "INSERT" PropList (list (cons 8 "LAY1") (cons 2 "BLOCK1")))
(ssget (cons (cons 0 (strcase ObjType)) PROPLIST)

------------------
  - 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

---

schaur dir das mal an (assoc 8 (entget(car(entsel))))
und dann das: (list 8 "MeinLayer")

und dann noch (CONS 8 "MeinLayer")

------------------
CAD.de System-Angaben  -  CAD on demand  -  User:FAQ(Acad)

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

---

Hallo Thomas,
vielen Dank für diese super-schnelle Antwort.
Als jemand, der selten mit Lisp programmiert, baut man auch mal komische Konstrukte. Dank deiner Hilfe habe ich wieder was dazugelernt.
Uwe

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