非常好用的填充描边
本帖最后由 nyistjz 于 2023-1-31 09:48 编辑十分好用的填充描边,配合工具箱一起使用,可以实现实时计算周长及面积。
对填充的选择有两种办法,一种是按参考对象选,另一种是忽略特性选择,并且可屏蔽已有关联边界的填充。
具体操作方法,请注意命令行提示。
工具箱说明及地址:
http://bbs.mjtd.com/thread-184305-1-1.html
;; 填充边界恢复
(defun C:hb (/ E I SS)
(if (setq SS (ssget '((0 . "HATCH"))))
(repeat (setq I (sslength SS))
(setq E (ssname SS (setq I (1- I))))
(if (null (tblsearch "LAYER" "B-Hatch"))
(command "-LAYER" "M" "B-Hatch" "C" 7 "" "" "")
)
(command "-LAYER" "s" "B-Hatch" "")
(setvar "cecolor" "bylayer")
(command ".-HATCHEDIT" E "B" "P" "Y")
(command "-layer" "s" "0" "")
(command "OSNAPHATCH" "1")
)
)
(princ)
) hatchedit 有创建边界的功能呀... e2002 发表于 2023-1-30 16:31
hatchedit 有创建边界的功能呀...
是的,可以理解为对这个功能的优化,操作更为方便。 谢谢楼主分享 学习了,谢谢分享
学习了,谢谢分享 学习了,谢谢分享 HATCHGENERATEBOUNDARY命令也可以创建边界
页:
[1]