如何将选中的标注样式快速设置为当前?
本帖最后由 mokson 于 2019-9-15 08:28 编辑图纸中有多种标注样式,有没有快速切换标注样式的方法?
如:将选中的某个标注样式瞬间将它设置为当前。
还有文字样式,有没有将选中的文字样式快速设置为当前样式? (command "-DIMSTYLE" "R" "Dim50") Linhay 发表于 2019-9-16 07:40
(command "-DIMSTYLE" "R" "Dim50")
谢谢关注的指点,我改为 (command "-DIMSTYLE" "R" "") 就可以自定义选择标注样式了,然后将这行代码设置为一个自定义的快捷键就实现了。感谢师兄的指点。 依此类推,快捷设置文字样式,也是可以这样吧:(command textstyle "your style") 本帖最后由 1291500406 于 2019-9-16 10:29 编辑
(defun c:bb( / bb)
(vl-load-com)
(vla-getentity(vla-get-utility(vla-get-activedocument(vlax-get-acad-object)
))' bb ' ip"\n必强提示选择尺寸")
(vl-cmdf "-DIMSTYLE" "R" (vla-get-StyleName bb))
(setvar ' Dimscale(vla-get-ScaleFactor bb))
(setvar 'clayer(vla-get-Layer bb))
(setvar 'dimtxt(vla-get-TextHeight bb))
(princ))
1291500406 发表于 2019-9-16 10:04
(defun c:bb( / bb)
(vl-load-com)
(vla-getentity(vla-get-utility(vla-get-activedocument(vlax-get-ac ...
感谢楼上兄,你的代码让我的想法变成现实。要向你们好好学习才是硬道理! 本帖最后由 q923890616 于 2019-9-18 10:51 编辑
1291500406 发表于 2019-9-16 10:04
(defun c:bb( / bb)
(vl-load-com)
(vla-getentity(vla-get-utility(vla-get-activedocument(vlax-get-ac ...
大佬可以这样修改一下吗,就是把拾取的对象参数从新设置一个标注样式,以后的每个拾取的参数都是修改这个标注样式,(由于作图习惯,可能还需要吧文字偏移(DIMGAP)这个值也拾取一下),可以吗,可以有偿。 非常感谢! 选择字体设为当前字体样式
(command "_.textstyle" (cdr (assoc 7 (entget (car(entsel "\n字体选择"))))))
页:
[1]