---

Hallo,
wir haben große Problem mit dem freistellen von MTexten. Bisher haben wir es über Wipeouts gelöst. Damit gab es aber Probleme in PDF Dokumenten. Der Acrobat Reader 7 zeigt bloß schwarze Kästchen. Beim 8er funktioniert es. Aber viele Kunden haben ihn nicht oder wollen ihn nicht. Dann sind wir dazu übergegangen mit dem ACAd internen Texthintergrund zu arbeiten. Jetzt haben wir Anzeigeprobleme (schwarze Kästchen) im PDF und in den 2005er LT Versionen. Man könnte um jeden text ein Rahmen ziehen und mit ganz hellgrau ausfüllen. Ist aber nicht Sinn der Sache und muss bei Veränderung des Textes per hand angepasst werden.
1.) Hat jemand eine Lösung für das Problem?
2.) wie kann man den Texthintergrund von allen MTexten in einer Datei entfernen?

------------------
Viele Grüße Lutz

Glück Auf! Erwischt!

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

---

was zu 2.

(defun c:Nobackground(/ AWS INDEX NEWL OBJ OBJGC)
  (if(setq AWS(ssget "_X" '((0 . "MTEXT"))))
    (progn
      (setq INDEX -1)
      (repeat (sslength AWS)
        (and(setq OBJ(ssname AWS(setq INDEX (1+ INDEX))))
            (setq OBJ(vlax-ename->vla-object OBJ))
            (vla-put-BackgroundFill OBJ :vlax-false)
        )   
      ) 
    )
  )
)

IMHO aber nicht für LT ... kannst es ja mal über entmod  versuchen

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

---

Danke, werde ich morgen ausprobieren. Lasse das in der Vollversion drüberlaufen, damit die Kollegen am LT auch wieder was sehen. 

------------------
Viele Grüße Lutz

Glück Auf! Erwischt!

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

---

So ausprobiert.  In eine *.txt geschrieben in *.lsp umbenannt, geladen.

1. Blick: ; Fehler:
Fehlerhafter Argumenttyp: numberp: <Selection set: 12> 

2. Blick: Alle Hintergründe sind weg! 

DANKE!

Nun aber zurück zur ersten Frage: Wie stellt ihr Texte frei?

------------------
Viele Grüße Lutz

Glück Auf! Erwischt!

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

---

Hallo Lutz,

meine Vorgehensweise:

1.: Für den Texthintergrund einen seperaten Layer anlegen und diesen aktuell setzen
2.: Diesem die Farbe 255 zuweisen
3.: In der ctb Farbe 255 -> Rasterung = 0
4.: Via getsel aus den E-Tools alle freizustellenden Texte in den Auswahlsatz nehmen
5.: _tcircle in der Befehlszeile eintippen (-> alte Textbox aus den E-Tools)
6.: Bei der Objektwahl v für vorher eintippen
7.: Einen Faktor für den Versatzabstand eingeben
8.: Text einschließen in Rechtecke
9.: mit variabler Größe
10.: Die erzeugten Rechtecke via getsel aus den E-Tools auswählen
11.: _bhatch -> Objekte wählen -> v für vorher
12.: Schraffurmuster: Solid
13.: mittels _draworder die Texte ganz nach oben legen

Das ganze Prozedere habe ich bei uns auf einen Button gelegt.
Und in erzeugten pdf's gibt's bei uns absolut keine Probleme damit.
Um nachträgliche manuelle Anpassungen zu vermeiden machen wir solche Textfreistellungen nach möglichkeit erst ganz zum Schluß.

Gruß

Christian

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

---

Hallo Christian, DANKE! Kannst Du das Buttonmakro evtl. mal reinstellen?

------------------
Viele Grüße Lutz

Glück Auf! Erwischt!

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

---

Hallo Lutz,

bei uns schaut das ganze so aus:

^C^C_-layer;m;DEIN LAYERNAME;fa;255;;se;DEIN LAYERNAME;;getsel;\\_tcircle;v;;\r;v;getsel;\\_-bhatch;e;solid;a;v;;;

Leider spreche ich kein lispianisch, ist mit Lisp bestimmt eleganter zu lösen. Aber für unsere Zwecke reicht's völlig aus...

Gruß

Christian

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