---

Hallo an alle Cad-User.
Gibt es eine Möglichkeit einen Text darzustellen der für verschiedene Masstabe seine Größe ändert. Dies müsste im Modellbereich passieren  evtl. durch klicken auf einen Button oder ähnliches.
So hat man die Möglichkeit die Texte zu ordnen und nicht für verschiedene Masstäbe doppelt zu zeichnen.
Ich möchte den Text nur einmal plazieren und für verschiedene Masstäbe nutzen.
Vielleicht hatte da ja schon jemand eine Idee oder Lösung.

Da bin ich mal gespannt ob es Lösungsansätze gibt.

------------------
Vielen Dank für jeden Hinweis.
Carsten

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

---

Wie du das im Modellbereich machen willst.. über variablen Textstil geht das nicht.... was man machen könnte ist: ein Tool, was eine Auswahl erstellt( auch alle) und dort entsprechend für den eingegebenen Maßstab für Texte die Höhe Breite usw. einstellt.
Sind auch Bemassungstexte zu beachten ?

------------------
- Thomas -

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

---

Hallo das ging aber schnell.
Es sind keine Masstexte zu beachten da ich eine Applikation benutze für Architektur (speedikon A). Dort gibt es eigene Bemassung. Die dürfte dann nicht mitregeneriert werden.Alle speed Layer werden sowieso immer gesperrt und von speedikon neuberechnet.

Beim Plotten geht man dann über ein Planmodul der auf die anderen Zeichnungen zurückgreift und im Plnm. Blöcke davon erstellt.
Der Text müsste dann dort erscheinen.

Die Auswahl müsste verschiedene Text größen berücksichtigen.

Gruß Carsten

------------------
Vielen Dank für jeden Hinweis.
Carsten

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

---

plot.zip

Hallo Carsten,
ich weiß ja nicht, wie Ihr arbeitet, aber eigentlich passt man auch die Textgrößen wie die anderen Objekte an.

Also wenn man im Modellbereich die Geschichte plottet, legt man den Maßstab für die Ausgabe spätestens bei der Bemaßung bzw. dem Einfügen des Zeichnungsrahmens fest...

Schau mal in den Anhang...

Gruss Angelika

------------------
Lieber Fehler riskieren als Initiative verhindern.
(Reinhard Mohn)

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

---

Hallo. Das ist ja viel zu lesen. :-)

Wir arbeiten im M. 1:1 , Modellbereich. Wenn ich die Darstellung M.1:100 kontrollieren will, lese ich einen Filter(Datei in speed) und alle Elemente aus speedikon stellen sich grafisch so dar als ob sie im M. 1:100 gezeichnet wären. Dann kann ich plotten.

Wenn also der Text in AC sich entsprechend auch ändert wäre es schon die Lösung. Aufjedenfall muss er das Layerweise tun damit ich verschiedene Textgrößen habe.

Ich hoffe ich habs verständlich erklärt.
Sonst nochmal fragen.

------------------
Vielen Dank für jeden Hinweis.
Carsten

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

---

Hallo Carsten,

schau mal auf meiner Seite unter Hilfe->Download->Prog14 Vielleicht hilft dir das ja.

Bei Fragen ...

Grüße Holger

------------------
Holger Brischke
(defun - Lisp over night!
AutoLISP-Programmierung für AutoCAD
Da weiß man, wann man's hat!

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

---

Hallo Holger.
Ich versuchsmal damit.
Danke

------------------
Vielen Dank für jeden Hinweis.
Carsten

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

---

(defun Scale_Text ( TEXTOBJEKT FAKTOR / OBJEKTDATEN )
  (if (and(=(type TEXTOBJEKT) 'ENAME)(numberp FAKTOR))
    (progn
      (setq OBJEKTDATEN (entget TEXTOBJEKT))
      (if (or(=(cdr(assoc 0 OBJEKTDATEN)) "TEXT")(=(cdr(assoc 0 OBJEKTDATEN)) "MTEXT"))
(progn
  (setq OBJEKTDATEN(subst(cons 40 (* (cdr(assoc 40 OBJEKTDATEN)) FAKTOR))
                                  (assoc 40 OBJEKTDATEN)
                                  OBJEKTDATEN))
          (entmod OBJEKTDATEN)
) 
      ) 
    )
  )
)
(defun C:Scale_Text ( / AUSWAHL OBJEKT FAKTOR )
  (if (setq AUSWAHL (ssget '(( 0 . "TEXT,MTEXT"))))
    (progn     
      (if (not(setq FAKTOR(getreal "Maßstabsfaktor : ")))
        (setq FAKTOR 1.0)
      )     
      (repeat (sslength AUSWAHL)
        (setq OBJEKT (ssname AUSWAHL 0))
        (Scale_Text OBJEKT FAKTOR)     
        (ssdel OBJEKT AUSWAHL)
      )
    ) 
  ) 
)

Etwas verspätet.. und macht bestimmt das gleiche wie Holgers...

------------------
- Thomas -

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

---

Super. ich habe leider nur keine Kenntniss von lisp etc.
Wie kann ich das einfügen oder kannst du mir auch noch das dazugehörige lisp machen.
Das wäre nett.

Carsten

------------------
Vielen Dank für jeden Hinweis.
Carsten

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

---

Hallo Carsten,

schau auf meiner Seite unter Hilfe->Training. Da gibt es dazu eine Anleitung.

Bei Fragen ...

Grüße Holger

------------------
Holger Brischke
(defun - Lisp over night!
AutoLISP-Programmierung für AutoCAD
Da weiß man, wann man's hat!

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

---

Vielen Dank an alle .

Jetzt hab ioch aber was zu tun.

Carsten

------------------
Vielen Dank für jeden Hinweis.
Carsten

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