Text Width

Text Width

Anonymous
Not applicable
3,246 Views
9 Replies
Message 1 of 10

Text Width

Anonymous
Not applicable

Request to provide option in AutoCAD file all text width factor change in one command.

0 Likes
Accepted solutions (2)
3,247 Views
9 Replies
Replies (9)
Message 2 of 10

Kent1Cooper
Consultant
Consultant

Try some Searching -- I imagine there is something already available.  If you don't find something that does what you want, I have questions:

Is it your intention to change the width factor in all text Style definitions, or to impose a width factor override on all Text objects?

By "text" do you mean only Text objects specifically, or do you also want it done to Mtext, and/or Block Attributes, Dimension text content, Multileaders, etc.?

Kent Cooper, AIA
0 Likes
Message 3 of 10

ВeekeeCZ
Consultant
Consultant

So do I have a question.

How would you like to change it? Like stretch some and narrow others? Or stretch all but with an increasing width factor? That could grow linearly or logarithmically or according to some other function. Plenty of options here. Or ever we could change it just for a split of second and get it back before the command ends. Just thinking out loud.

0 Likes
Message 4 of 10

ParishSouthBdx
Collaborator
Collaborator

could you change the width factor with the command STYLE?  if you set that width factor there it should change it per design session within autocad.   where its using that style of course.   not sure if it changes it globally. you may have to change the width factor of the font within the style, one style at a time.

0 Likes
Message 5 of 10

Anonymous
Not applicable

In my current AutoCAD ".dwg" File

We want to change all Single line & Multiline text width factor in a single command.

I want to set width factor of text is only “1.0”

 

Whatever be text style.

 

@Kent1Cooper @ВeekeeCZ @ParishSouthBdx 

0 Likes
Message 6 of 10

hak_vz
Advisor
Advisor
Accepted solution
(defun wf ( / ss i)
(setq ss (ssget "X" '((0 . "TEXT"))) i -1)
(while (< (setq i (1+ i)) (sslength ss))
(vlax-put (vlax-ename->vla-object (ssname ss i)) 'ScaleFactor 1.0)
)
)
(defun c:wf nil (wf))

Miljenko Hatlak

EESignature

Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.
Message 7 of 10

Anonymous
Not applicable

@hak_vz 

Hi, We don't know AutoLisp program in a CAD file how to change in a single command?

 

0 Likes
Message 8 of 10

hak_vz
Advisor
Advisor
Accepted solution

Save code into a file with extension .lsp inside trusted directory.  Then true drop down menus go to TOOLS -> load application  and chose startup suite, and load file. It will be loaded with every drawing. Chose command wf to put width factor to 1.

 

I don't understand why you need lisp or any code for this since it can be easily done to tools->quickselect

Miljenko Hatlak

EESignature

Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.
Message 9 of 10

Anonymous
Not applicable

@hak_vz 

Dear Sir,

 

Thank you very much, for solutions.

 

>quickselect

 

Fantastic second option we like.

 

Request to you please share me your personal email id for my record purpose.

 

With Best Regards,

PRUTHVIRAJ DHAVALE

Order Related Engineering

SULZER PUMPS INDIA PVT. LTD.

9-MIDC Thane Belapur Road
Digha, Navi Mumbai 400708, INDIA

Mobile: + 91 9764036692

E-mail: pruthviraj.dhavale@gmail.com

Message 10 of 10

hak_vz
Advisor
Advisor

@AnonymousYou can always use private messages among registered users profiles. Just make mouse over my profile and pop-up will show with a contact link to send me private message.

Miljenko Hatlak

EESignature

Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.
0 Likes