zilong136 发表于 2024-2-5 02:41:50

标注样式管理器代码怎么写?


[*](defun c:g1()
[*](princ "\n g1标注样式管理器")
[*]    (initdia)(vl-cmdf "dimstyle")
[*])
[*]怎么改这串代码?
[*]


xiaocainiao 发表于 2024-2-5 08:04:50

(defun c:g1 ()
        (vl-load-com)
        (vla-sendcommand
                (vla-get-ActiveDocument (vlax-get-acad-object))
                "DIMSTYLE "
        )
        (princ)
)

是这个意思吧

xj6019 发表于 2024-2-5 13:18:26

xiaocainiao 发表于 2024-2-5 08:04


直接D回车不就是吗,你猜楼主是不是不知道呀

xiaocainiao 发表于 2024-2-5 16:03:16

xj6019 发表于 2024-2-5 13:18
直接D回车不就是吗,你猜楼主是不是不知道呀

有可能他是想用Lisp去修改标注样式的快捷键、我以前就干过这种事

zilong136 发表于 2024-2-5 22:34:17

xj6019 发表于 2024-2-5 13:18
直接D回车不就是吗,你猜楼主是不是不知道呀

看破不说破;P

zilong136 发表于 2024-2-5 22:35:23

xiaocainiao 发表于 2024-2-5 16:03
有可能他是想用Lisp去修改标注样式的快捷键、我以前就干过这种事

我现在就是走你以前走的路,还得是你啊。

shirker 发表于 2024-2-15 22:07:04

学习了,支持一下
页: [1]
查看完整版本: 标注样式管理器代码怎么写?