---

Moin,moin

ich habe folgendes Problem: Ich möchte gerne den Inhalt eines Textes in AutoCad einer Variablen in Autolisp zuweisen. Welche Befehle kommen hierfür in Frage. Später möchte ich dann denn Inhalt dieser Variable den Wert eines Attrubutes zuweisen.

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

---

keine Zeit, deshalb ganz kurz:
1) (setq textvar (cdr(assoc 1 (entget (car (entsel))))))
2) (entmod (subst (cons 1 textvar)(assoc 1 (setq attdata(entget(car (nentsel))))) attdata))

Mit der ersten zeile kannst du den Text wählen, die 2. Zeile weist den Text dem Attribut zu.

Wenn's nicht reicht, dann poste noch mal, schaue nach 20,00Uhr noch mal rein.

Bei Fragen ...

Grüße Holger

------------------
Holger Brischke
CADlon - Lisp over night!
Neue Tool's im Free-&Download
Zugang zum Download schon gesichert?

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

---

hallo Brischke
ich habe jetzt gerade deine erste zeile verwendet. funzt bestens.

1) (setq textvar (cdr(assoc 1 (entget (car (entsel))))))

nur leider schnall ich überhaubt nicht was da passiert 
befasse mich erst seit ganz kurzer zeit mit autolsip.
wenn du ev. zeit hättest wäre ich froh wenn du mir die zeile ein wenig erläutern könntest.
besten dank auf jeden fall war sowiso hilfreich.
gruss steff

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

---

Hi Steff,

(auch wenn ich nicht Holger bin) folgende Empfehlung zum Lernen, wenn Du Code in Lisp bekommst, dann kannst Du selbst die Zeile dadurch analysieren, indem Du, von innen nach aussen, die geklammerten Bereiche einfach in die Befehlszeile eingibst und Dich so nach aussen bastelst.

Also jeweils einzeln in die Befehlszeile und dann <Enter> und sehen, was AutoCAD mit Dir spricht:

Code:

---

(entsel)
(car (entsel))
(entget (car (entsel))
(assoc 1 (entget (car (entsel))))
(cdr (assoc 1 (entget (car (entsel)))))

---

...wenn Du obige Zeilen durchprobiert hast, bekommst Du die Abfrage (Objektwahl) und nachfolgende Ergebnisse 'serviert'.

- alfred -

------------------
www.hollaus.at

[Diese Nachricht wurde von a.n. am 27. Feb. 2009 editiert.]

---

ansonsten, einen guten Einstieg bietet auch Mapcars Tutorial und die dazugehörige Printausgabe

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