白皮猪 发表于 2015-2-14 11:18:25

求救！如何将当前文字样式改为所单选的文字的文字样式？

本帖最后由 白皮猪 于 2015-2-14 19:25 编辑


请各位大侠帮帮忙，怎么样才能将当前文字样式(如图)改为所单选的文字的文字样式？

ZZXXQQ 发表于 2015-2-14 19:32:47

(defun c:tt ()
(if (setq s1 (entsel "\n选择物体: "))
(setvar "CLAYER" (cdr(assoc 8 (entget(car s1)))))
)
(princ)
)

白皮猪 发表于 2015-2-14 20:01:45

本帖最后由 白皮猪 于 2015-2-15 11:57 编辑

ZZXXQQ 发表于 2015-2-14 19:32 static/image/common/back.gif

谢谢版主的回复，我是个菜鸟，如何改成将当前文字样式(如图)设置为所单选的文字的文字样式？求助！求助！求助！

白皮猪 发表于 2015-2-14 21:01:12

本帖最后由 白皮猪 于 2015-2-15 11:57 编辑

ZZXXQQ 发表于 2015-2-14 19:32 static/image/common/back.gif

尝试在基础上改了一下。问题已解决了。谢谢版主回复！
页: [1]
查看完整版本: 求救！如何将当前文字样式改为所单选的文字的文字样式？