Topic: Leader color override ?

[jlogan02]

Our Dimstyle has dim lines and leader colors overridden to Yellow and dim text overridden to Green. During design all new objects become red for new construction and then get turned back to the overridden colors.

I'd really like it to select the red leaders and/or dimensions at the same time it selects everything else without prompting the user. Maybe that won't work since I'm dealing with the overridden dimension colors.

For now I'm just dealing with leaders this way.

 

Code - Auto/Visual Lisp: [Select]

1.   (while (and (Princ "\nSelect LEADERS to change.")
2.     (setq ss (ssget "_:L" '((0 . "LEADER")))))
3.     (setq cm (getvar 'cmdecho))
4.     (setvar 'cmdecho 0)
5.     (command "_.dimoverride" "dimclrd" 2 "dimclre" 2 "" ss "")
6.     (setvar 'cmdecho cm)
7.   );;while
8.  
9.   (if (setq cl1 (ssget "X" '((0 . "*LINE,*TEXT,ARC,CIRCLE,HATCH") (62 . 1))))
10.     (foreach x (mapcar 'cadr (ssnamex cl1))
11.     (entmod (append (entget x) '((62 . 256)))))
12.   );;end if