用visual lisp对CAD二次开发中怎样修改尺寸标注样式中的参数，急求！ 100
1个回答
展开全部
程序如下，可以修改标注样式名，怎么修改标注样式里面的文字高度？
(defun C:TES ( / &ss1 dim1 dim2 dim3)
(setvar "cmdecho" 0)
(setvar "blipmode" 0)
(if (null vlax-dump-object) (vl-load-com) )
(setq dim1 (vla-get-DimStyles (vla-get-ActiveDocument (vlax-get-acad-object))));提取标注样式
(setq &ss1 '())
(vlax-for dim2 dim1
(setq &ss1 (cons (vla-get-name dim2) &ss1))
);取得标注样式集合
(princ &ss1)
(setq dim3 (vla-Item dim1 "Standard"));标注样式【Standard】
;(vlax-dump-object dim3 t)
(vla-put-Name dim3 "TSSD");修改名称【Standard】为【TSSD】
(princ)
)
更多追问追答
追问
用autolisp语言如何编程
追答
这个也在摸索中。私信给你。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
网易云信
2023-12-06 广告
UIkit是一套轻量级、模块化且易于使用的开源UI组件库，由YOOtheme团队开发。它提供了丰富的界面元素，包括按钮、表单、表格、对话框、滑块、下拉菜单、选项卡等等，适用于各种类型的网站和应用程序。UIkit还支持响应式设计，可以根据不同...
点击进入详情页
本回答由网易云信提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
|
广告 您可能关注的内容 |
