社区 › 编程申请 › 有劳各位帮忙把这两个程序合并一下，在这先谢谢了

my258 发表于 2020-8-10 15:32:42

有劳各位帮忙把这两个程序合并一下，在这先谢谢了

一直工作因对一些图形用不一样的标注样式感觉这两个程序很好用，有劳各位帮忙把这两个程序合并一下，在这先谢谢了
(defun c:dd ()
(command "-DIMSTYLE" "R" "副本1")
(princ)
)

(defun c:ddd ()
(vl-cmdf "-dimstyle" "a" (ssget) "")
(princ)
)

kongel 发表于 2020-8-10 17:45:52

(defun c:dd ()
(command "-DIMSTYLE" "R" "副本1")
(vl-cmdf "-dimstyle" "a" (ssget) "")
(princ)
)

my258 发表于 2020-8-11 17:52:50

@kongel 谢谢，是小白刚开始也这样合过，但像有时没反应

执骨哟 发表于 2020-9-3 10:36:43

本帖最后由 执骨哟 于 2020-9-3 10:37 编辑

(defun ddd ()
(vl-cmdf "-dimstyle" "a" (ssget) "")
)
(defun c:dd ()
(ddd)
(command "-DIMSTYLE" "R" "副本1")
(princ)
)

查看完整版本: 有劳各位帮忙把这两个程序合并一下，在这先谢谢了