---

Hallo
habe folgendes Problem im ACAD 2004.
wenn ich einen Text mit Ausrichten: einpassen auf Ausrichten: links ändere dann ändert sich auch die Drehung des Textes auf 0 bezogen auf das Weltkoordinatensystem. Im ACAD 2000 war das nicht so.
Hat jemand von euch eine Lösung ?

Markus

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

---

nutze den Befehl "_justifytext" ... (ZENTRTEXTAUSR)

Werkzeugkasten "Text"

------------------
- Sebastian Mattis -

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

---

Danke für deine Antwort
allerdings ist das nicht ganz die Lösung meines Problems.
Wir bekommen Daten aus einem anderen CAD-Programm. Die meisten Texte haben im Eigenschaftsfenster unter Ausrichten den Eintrag "einpassen" mit beliebeigen Breitenfaktoren, beliebiger Drehung und dem Textstil Standard. Unter ACAD 2000 habe ich nun im Eigenschaftsfenster einen Filter gesetzt den Stil geändert und Ausrichten von "einpassen" auf "links" geändert - Breitenfaktor war dann auf "1" gesetzt und Drehung blieb erhalten - alles war erledigt. In ACAD 2004 bleibt der Breitenfaktor auf dem beliebigen Faktor und Drehung wird auf "0" gesetzt.
Unter ACAD 2000 war das ganze eine Aktion von ein paar Sekunden und jetzt ...

Markus

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

---

auf die Schnelle :

(defun c:SET_My_OWN ( / Auswahl OBJEKT OBJEKTDATEN)
  (if(setq AUSWAHL (ssget "_X" (list (cons 0 "TEXT,MTEXT"))))
    (repeat (sslength AUSWAHL)                 
      (setq OBJEKT (ssname AUSWAHL 0))         
      (setq OBJEKTDATEN (entget OBJEKT))
      (if (assoc 72 OBJEKTDATEN) ; Ausrichtung "Links"
        (setq OBJEKTDATEN(subst(cons 72 0)(assoc 72 OBJEKTDATEN)OBJEKTDATEN))       
      )
      (if (assoc 41 OBJEKTDATEN) ; Breitenfaktor
        (setq OBJEKTDATEN(subst(cons 41 1.0)(assoc 41 OBJEKTDATEN)OBJEKTDATEN))       
      )
      (if (assoc 7 OBJEKTDATEN) ; Textstil
        (setq OBJEKTDATEN(subst(cons 7 "Romans")(assoc 7 OBJEKTDATEN)OBJEKTDATEN))       
      )
      (entmod OBJEKTDATEN)
     
      (setq AUSWAHL (ssdel OBJEKT AUSWAHL))    
    ) 
  ) 
  (princ)
)
 
Vielleicht hilft dir das?

EDIT : Textstil setzen eingefügt. "Romans" ist der Stilname, nicht der Name des Fonts! Textstil muß existieren

Gruß Thomas

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

[Diese Nachricht wurde von CADmium am 17. Feb. 2004 editiert.]

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

---

Hallo Markus, du solltest dich evtl mal (unabhängig von dem akt. Problem) mit

• Filter  oder der
  
• Schnellauswahl
  

auseinandersetzen ! - Es ist zwar so das im Eigenschaftenfenster die Option zur Schnellauswahl angeboten wird,
aber die Schnellauswahl hat absolut nichts mit dem Eigenschaftendialog zutun, mit der Schnellauswahl (wie mit dem Filter)
erzeugst du einfach nur einen Auswahlsatz ! - Was und wie du etwas mit dieser Auswahl machst, ist völlig egal !

Du kannst also die Schnellauswahl "beauftragen" dir alle Objekte TEXT mit der Ausrichtung EINPASSEN
zu suchen, mit dem bestätigen des "OK"-ButtonŽs ist der Auswahlsatz erstellt und du kannst den Befehl
_justifytext (oder jeden anderen) wählen...
Schon hast du es für alle auf einen Schlag gelöst ! - wie "früher" 

[das gleiche gilt im Grunde für den Befehl "Filter"]

Hoffe dir hiermit den passenden Wink für viele folgende Herausforderungen gegeben zu haben. 

------------------
- Sebastian Mattis -

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

---

@Sebastian
das mit dem Auswahlsatz und dem Befehl ist mir schon klar
Über das Eigenschaftsfenster konnte ich sehr komfortabel mehrere Eigenschaften auf einmal ändern (Textstil, Breitenfaktor, Höhe, Ausrichtung). _justifytext richtet zwar Text aus ändert aber nicht Breitenfaktor und Stil. also ein Befehl und noch einer ....

@Thomas
genau das war es!
Da ich aber kaum eine Ahnung von LISP habe eine große Bitte: könntest du mir noch eine Änderung des Textstils einbauen (immer der gleiche Stil bei mir meistens Romans)
Die UNITS sind aber auf jeden Fall unterwegs.

Danke für eure Hilfe
Markus

Ich frage mich nur warum Autodesk etwas das funktioniert in einer neuen Version zum Schlechteren ändert.

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