text sizes in dimension style...help

[leonucadomi]

hello ALL:

 

I would like to know if there is any routine for change text size massively 

in the different existing dimension styles.

 

any comments about it?

 

thanks

[mhupp]

Your only wanting to change the current Dimstyle?

 

;;----------------------------------------------------------------------------;;
;; Dimstyles Text Height Change
(defun C:DimHeight (/ dim h name)
  (setq dim (vla-get-activedimstyle (vla-get-activedocument (vlax-get-acad-object))))
  (setq style (entget (vlax-vla-object->ename dim)))
  (if (setq h (cons 140 (getreal (strcat "\nDimension Text Size: "))))
    (progn
      (entmod (subst h (assoc 140 style) style))
      (setvar 'dimtxt (cdr h))
    )
  )
  (princ)
)

 

[Steven P]

If you want all the dimension styles you might need to add this function somewhere:

 

(defun tablesearch ( s / d r) ;;List Dimstyles
  (while (setq d (tblnext s (null d)))
    (setq r (cons (cdr (assoc 2 d)) r))
  )
)

 

 

and to loop through the list something like this:

 

(foreach x (tableSearch "dimstyle")

--- do stuff

(princ "\n")
(princ x) ; for example

) ; end foreach

 

 

 

That isn't what I was going to say though, I have found that adjusting the text sizes a lot can make the spacing and arrows out or proportion, the LISP I use does this with dimstyles rather than MHUPPs entmod method - you might want to search for that as well. For example a text size of 250 dwarfs an arrow size of 2.5

 

MHUPP is pretty good with this stuff and might modify his for example to put arrow size to the same as text size to show how to build up his code to add more stuff (I don't know the code for 'arrow size' )

[leonucadomi]

thanks for your help.

am using many files and they have text size 3

so i must change to 3.5

that's why ask if with some routine you can modify the different dimension styles in the different drawings

 

[Steven P]

To do many drawings all at once you might also consider a script process, like Script Pro or Lee Macs script maker, get the lisp working as you want and then do the script on all the drawings

[leonucadomi]

good idea , thanks

[tombu]

You should consider switching to annotative dimensions so they'd display the same at different scales in MS and the same drawn in PS.

Rather than end up with dimensions with varying gap & arrow sizes you could add a dimension style exactly how you want and set that style to all your dimensions.