求教!如何修改多重引线的文字样式
(defun c:tt ()(setq en (car(entsel)))
(setq en_data (entget en))
(setq en1 (cdr(assoc 340 en_data)))
(setq en_340 (entget en1))
(if en_340
(entmod (subst (cons 2 "文字") (assoc 2 en_340) en_340))
)
)我自己尝试了一下用entmod修改多重引线的文字样式、
发现修改不了、不知道什么原因。
请教各位大神、有没有其他方法可以修改多重引线的文字样式、感谢!
试试这样呢
(defun c:tt ()
(vlax-put-property (vlax-ename->vla-object (car (entsel))) 'TextStyleName "文字")
) ssyfeng 发表于 2024-3-29 16:58
试试这样呢
这个可以、谢谢 ssyfeng 发表于 2024-3-29 16:13
试试这样呢
大神!还想请教一下、像标注样式、多重引线样式和表格样式设置中的文字样式如何修改呢?我想搞个合并文字样式的功能、修改图元样式这个会改了、但是对于标注样式中带有文字样式设置的、不知道从哪下手了
页:
[1]