Hallo
ich habe Blöcke mit Attributen. Diese Attribute möchten ich gerne mit einem Texthintergund belegen, damit man sie beser lesen kann. Wie macht man so etwas. Das Attribut als Multilinie habe ich schon erledigt, aber mit dem Hintergrund klappt es nicht. Ich kann natürlich alle Attribute händisch aufrufen und den Texthintergrund anschalten. Da das ca. 500 Blöcke sind ist das etwas mühselig. Kann mir jemand einen Tip geben?
(DEFUN c:Attsetz()
(SETQ pkt (GETPOINT "Bitte geben Sie einen Punkt an: "))
(SETQ atx (CAR pkt))
(SETQ aty (CADR pkt))
(SETQ dy 5)
(SETVAR "AFLAGS" 32)
(COMMAND "_-ATTDEF" "" "POSA1" "(000)" "" (LIST (+ atx 5) (- aty (* dy 11))) "H" 250 "A" "MZ" "B" 700)
(SETVAR "AFLAGS" 32)
(COMMAND "_-ATTDEF" "" "POSA2" "[000]" "" (LIST (+ atx 5) (- aty (* dy 12))) "H" 250 "A" "MZ" "B" 700)
); end defun
mfg Dirk
------------------
mit freundlichen Grüßen
Dirk
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP