---

Einen schönen guten Tag.ich habe da ein Problemchen.Ich habe in einer Zeichnung sehr viele identische Blöcke,
diese möchte ich mit einem Lisp mit anpicken so das diese zum weiterverarbeiten makiert sind  , wie ZB. auflösen, löschen usw.Gibt es vieleicht solch ein Lisp schon ? Vielen Dank für die Antworten.

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

---

Dazu brauchts kein Programm, dafür reicht eine Zeile:

(ssget "X" (list (cons 0 "INSERT") (cons 2 "blockname")))

Kopier Dir das in die Befehlzeile -
ersetze aber "blockname" durch Deinen Blocknamen.

Mit Auswahl / Vorherige kannst Du drauf zugreifen.

------------------
Schöne Grüße
Ernst

www.geopaint.at

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

---

Hallo Ernst, danke für die superschnelle Antwort.Die Blöcke die ich in einer Zeichnung habe oder bekomme,haben Unterschiedliche Namen,deshalb wollte ich einen Block davon anpicken und die anderen mit dem gleichen Namen mackieren sich gleich automatisch mit.

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

---

Die Zeile von Ernst ist schon OK....aber für dich etwas abgewandelt:

(sssetfirst(setq a(ssget "X" (list (cons 0 "INSERT") (assoc 2 (entget (car(entsel "\nBlock wählen: ")))))))a)

..allerdings ohne Fehlerhandling ... , also wenn keine Blockreferenz gewählt wurde , wird abgebrochen ..

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

du kannst in der vom Ernst geposteten Zeile mit Wildcards arbeiten. Das heißt, du kannst auch Inserts mit unterschiedlichen Namen auf einmal picken:

(ssget "X" (list (cons 0 "INSERT") (cons 2 "BLOCKBASISNAME*")))

Wenn du also einen Bsp-Insert picken willst, und von dessen namen nur ein Teil mit den Namen der ebenfalls zu wählenden INSERTS übereinstimmt, dann solltest du den Code wie folgt ändern:

(ssget "X" (list (cons 0 "INSERT") (cons 2
(strcat(substr (cdr(assoc 2 (entget(car(entsel"INSERT wählen: "))))) 1 5)"*")
)))

In diesem Bsp, werden nur die ersten 5 Zeichen des gewählten Blocknamens für die Auswahl der weiteren Blöcke herangezogen.

Baust du diesen Auswahlsatzt nun mit (sssetfirst nil aws) zusammen, werden die selektierten Blöcke mit Griffen versehen.

Alles klar?

Bei Fragen ...

Grüße Holger

------------------
Holger Brischke
CAD on demand GmbH
Individuelle Lösungen von Heute auf Morgen.

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

---

Nach welchen Kriterien willst Du denn filtern?

Eventuell kannst die Zeile noch erweitern, zB. mit (cons 8 "layername") usw. 
(siehe Hilfe zu (ssget) / Filter )

(edit: da waren die anderen schneller)
------------------
Schöne Grüße
Ernst

www.geopaint.at

[Diese Nachricht wurde von Geos am 20. Mai. 2008 editiert.]

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

---

Vielen vielen dank für Eure Antworten auf mein Problem ( chen ).
Funktioniert wirklich super, danke danke nochmals.

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

---

Schon mal die Schnellauswahl (Befehl SAUSWAHL / _QSELECT) angeschaut?

------------------
Marco Caprez
Getronics (Schweiz) AG

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

---

Zitat:

---

Original erstellt von Getronics:
Schon mal die Schnellauswahl (Befehl SAUSWAHL / _QSELECT) angeschaut?

---

und wenn man den Blocknamen nicht weiß???

siehe 1.Post :
..diese möchte ich mit einem Lisp mit anpicken so das diese zum weiterverarbeiten makiert sind ..

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