| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
|
Autor
|
Thema: mtext (1629 mal gelesen)
|
adblue
Mitglied
.
   Beiträge: 57
Registriert: 22.05.2009
|
erstellt am: 17. Okt. 2009 18:45  <-- editieren / zitieren -->   Unities abgeben:          
hallo!
ich möchte über mtext einen mehrzeiligen text in autocad schreiben über vba. der code dazu
text = "TEXT TEXT TEXT"
Dim punkt(0 To 2) As Double
punkt(0) = 0
punkt(1) = 0
punkt(2) = 0
Dim test As AcadMText
Set sch = ThisDrawing.ModelSpace.AddMText(punkt(), 0.2, text) problem ist, ich möchte den text in drei zeilen untereinander stehen haben. wie mache ich das?
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium
Moderator
Maschinenbaukonstrukteur
    
Beiträge: 13508
Registriert: 30.11.2003 ACAD 2008 Mechanical
|
erstellt am: 17. Okt. 2009 19:14 <-- editieren / zitieren --> Unities abgeben: Nur für adblue 
naja ..erzeugt dir mal auf gewöhnlichem Wege einen Mtext und schreib den im Mtexxteditor in 3 Zeilen untereinander ... dann guck dir mal mit (cdr(assoc 1(entget(car(entsel "\nMtext wählen:")))))
die Inhalt des Textstrings an , welche Formatierungszeichen du einbauen musst ... ------------------
 - 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 |
adblue
Mitglied
.
Beiträge: 57
Registriert: 22.05.2009
|
erstellt am: 17. Okt. 2009 19:18 <-- editieren / zitieren --> Unities abgeben:
|
CADmium
Moderator
Maschinenbaukonstrukteur
Beiträge: 13508
Registriert: 30.11.2003 ACAD 2008 Mechanical
|
erstellt am: 17. Okt. 2009 19:33 <-- editieren / zitieren --> Unities abgeben: Nur für adblue
|
Stelli1
Moderator
Verm.-Ing.
Beiträge: 1521
Registriert: 17.08.2005 Map 2000-2014, Rasterdesign,
MapGuide, Autodesk Topobase,
VS6, VS.net 2013
|
erstellt am: 18. Okt. 2009 18:15 <-- editieren / zitieren --> Unities abgeben: Nur für adblue
Hallo, du kannst auch den Befehl LISTE verwenden um dir den Inhalt des MTextes anzusehen.
Der wird dann offenbaren das ein Zeilenumbruch mit \P erreicht wird. "Text\PText\PText" wird dir den Text drei mal untereinader schreiben. Wilfried Stelberg ------------------
Warum lisp'eln wenn's auch anders geht. 
www.ib-stelberg.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de (alle Foren)
| 
