Change style label Civil 3d

Change style label Civil 3d

manualdecad
Participant Participant
262 Views
2 Replies
Message 1 of 3

Change style label Civil 3d

manualdecad
Participant
Participant

I'm trying to modify a style of a label in autocad civil 3d by another style that already exists, but it's giving me an error, could someone help me.

(DEFUN C:se()
(vl-load-com)
(setq el (car (entsel "\nSelecione o label que deseja inverter: ")))
(setq elo (vlax-ename->vla-object el))
(setq elest (vlax-get-property elo 'LabelStyle))
(setq nome (vlax-get-property elest 'name))
(setq dir (vl-string-search "DIREITA" NOME))
(if (/= dir nil)
(setq nome2 "TIE-IN_PLANTA_A ESQUERDA_H 1.30" )
(setq nome2 "TIE-IN_PLANTA_A DIREITA_H 1.30" )
)
(vlax-property-available-p elest 'name t)
(vlax-dump-object elest)
(VLAX-PUT-PROPERTY elest 'Name nome2)
)

0 Likes
263 Views
2 Replies
Replies (2)
Message 3 of 3

Sea-Haven
Mentor
Mentor

Try this its not straight forward you have to get like the style object not the "name" which is more a description.

 

I also have rotate a pt, label pt ht as text, change text style in labels, plus a lot more stuff. PM me with a email and can send more info.

 

 

0 Likes