---

Hallo,
ich  habe eine größere Anzahl Zeichnungen mit verschiedenen Blöcken.
Alle enthalten sichtbare und unsichtbare Attribute. Ich möchte alle Blöcke auflösen, den eingegebenen Text behalten und alle leeren und unsichtbaren Attribute löschen.
Vor einigen Jahren hatte ich dieses Problem schon einmal. Bei der aktuelle AutoCad-Version funktionierte att2txt.lsp nicht. Zu diesem Zeitpunkt hatte ich aber noch eine ältere Version (2000 oder 2004 – weiß ich nicht mehr so genau) wo die Umwandlung problemlos möglich war.
Leider gibt es diese Möglichkeit nicht mehr, ich habe nur noch AutoCAD 2010 & 2011.
Ausprobiert habe ich:
BURST – funktioniert nicht, da die unsichtbaren Attribute nun sichtbar sind
ATT2TXT – er fragt nach Objekte wählen und sagt dann 0 gefunden
ATTRTOTXT – es kommt folgende Fehlermeldung:
Ungültiger Feldtyp in 280 in (entmake).
Ungültiger Feldtyp in 280 in (entmake).._EXPLODE
der Block wurde aufgelöst, allerdings sind alle Texte weg
Mehr Ideen bzw. Lösungsansätze habe ich nicht mehr. Meine LISP-Fähigkeiten sind sehr gering, so dass ich in der Hinsicht auch nichts selber programmieren kann.
Sindy

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

---

google mal nach -> BURST .. haben auch welche nachgeproggt

welche att2txt.lsp oder so nimmst du denn ? Ich hatte mal ne um den 280'er modifizierte hier reingestellt

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

---

Habe ich ausprobiert. Leider werden dann die Texte in den unsichtbaren Attributen sichtbar was nicht gewollt ist.

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

---

;Converts attributes (attr. definitions, tags) to plain texts
(defun C:ATT2TXT ( / ss ssl i e new grp grplst addg)
  (setq ss (ssget '((0 . "ATTDEF"))))
  (setq ssl (sslength ss)  i 0)
  (setq grplst (list 7 8 10 11 39 40 41 50 51 62 71 72 73))
  (while (< i ssl)
    (setq e (ssname ss i))
    (setq ent (entget e))
    (setq new '((0 . "TEXT")))
    (setq new (append new (list (cons 1 (cdr (assoc 2 ent))))))
    (foreach grp grplst
      (setq addg (assoc grp ent))
      (if (/= addg nil)
        (setq new (append new (list (assoc grp ent))))
      )
    )
    (entmake new)
    (entdel e)
    (setq i (1+ i))
  )
  (princ)
)

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

---

das Teil konvertiert keine Attribute , sondern Attributsdefinitionen .. ist was anderes  

Siehe http://ww3.cad.de/foren/ubb/Forum54/HTML/016143.shtml

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

---

Vielen Dank,
es funktioniert jetzt.
Sindy

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