Mtext
Printed From: CAD Forum
Category: EN
Forum Name: Civil 3D, Map, InfraWorks
Forum Description: Discussion about mapping and GIS applications Map, Civil3D, InfraWorks, MapGuide and Raster Design
URL: https://www.cadforum.cz/forum_en/forum_posts.asp?TID=6559
Printed Date: 13.May.2026 at 08:55
Topic: Mtext
Posted By: MARTIN_1234
Subject: Mtext
Date Posted: 10.Sep.2011 at 04:22
|
Does anybody have experiance with: changing Simple text to Mtext? If it comes to one text conversion to One Mtext its easy but if I want to change over 1000 texts to Mtext and I highlight all texts , then I'm creating one big Mtext with over 1000 words in Mtext.Next thing is that I want the"new" Mtext keep original position of text.Is any body good at that problem?
|
Replies:
Posted By: Vladimir Michl
Date Posted: 10.Sep.2011 at 13:13
You can try to use the following LISP code (txt1mtxt.lsp):
; CADstudio TXT1MTXT - text to mtext (individual)
(defun c:txt1mtxt (/ ss lst x)
(setvar "CMDECHO" 0)
(command "_undo" "_begin")
(setq ss (ssget '((0 . "TEXT"))))
(setq lst (vl-remove-if 'listp (mapcar 'cadr (ssnamex ss))))
(mapcar '(lambda (x) (command "txt2mtxt" x "")) lst)
(command "_undo" "_end")
(setvar "CMDECHO" 1)
(princ)
)
|
-------------
Vladimir Michl (moderator)
ARKANCE - https://arkance.world" rel="nofollow - https://arkance.world - Autodesk Platinum Partner
|
Posted By: MARTIN_1234
Date Posted: 12.Sep.2011 at 19:54
|