---

Hi Leute,
wer kann mir bei der Auswahl über ssget helfen.
Ich will einen Text innerhalb einer Polylinie finden und weiterbearbeiten.
Die Punkte der Polylinie habt ich in der Variable XX gespeichert.
Nur mit der Filterung Text und Layer funktioniert irgendwo nicht.

(defun C:test ()
  (setq xx (GET-PL-POINTS (car (entsel))))
  (setq ss (ssget "_WP" xx '(and (0 . "TEXT") (8 . "Raumbezeichnung"))))
  )

;------ Polylinien auswahl
(defun GET-PL-POINTS (ENAME / EDATA PTLISTE X)
  (if (= (cdr (assoc 0 (entget ENAME))) "LWPOLYLINE")
    (setq EDATA  (entget ENAME)
          PTLISTE (apply
                    'append
                    (mapcar
                      '(lambda (X)
                        (if (= 10 (car X))
                          (list (cdr X))
                        ) ;_ end of if
                      ) ;_ end of lambda
                      EDATA
                    ) ;_ end of mapcar
                  ) ;_ end of apply
    ) ;_ end of setq
    (setq PTLISTE (GET-HW-PL-POINTS ENAME))
  ) ;_ end of if
) ;_ end of defun

Gruß Christian

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

---

(ssget "_WP" xx '((0 . "TEXT")(8 . "Raumbezeichnung")))

sollte es sein, wobei xx die Liste der Punkte ist und keine doppelten vorkommen dürfen.. Objekte in polylinienbögen werden in dieser Variante ignoriert

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

---

Und noch was.
Ein gerne gemachter Fehler.
Bei SSGET mit Fenster, Zaun usw. müssen die Objekte vollständig am Bildschirm sichtbar sein.

------------------

Ing. Anton Fuchs
WWW.FFZELL.AT.TC

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