lzg8877 发表于 2015-6-11 20:57:23

收藏备用　谢谢

dingtiedt 发表于 2015-6-12 10:44:22

增加了一句
(defun c:tt(/ ss)
(command "layer" "M" "DIM" "C" "3" "" "LT" "CONTINUOUS" "" "");设置一个标注图层
(princ "\n框选标注归到DIM层")
(setq ss (ssget ":s" '((0 . "DIMENSION"))))
(command "_.chprop" ss "" "LA" "DIM" "")
(gc)
)

这样在没有DIM图层的情况下自动加一个

CAD小学徒 发表于 2016-7-30 07:57:42

挺好的，非常好用。。。。

城市的邊緣 发表于 2016-9-18 21:24:47

好东西   学习一下

心中的梦想 发表于 2019-6-21 19:16:51

谢谢分享！！！
页: 1 [2]
查看完整版本: 一键提取所有标注