paulpipi 发表于 2020-9-26 12:39:00

急时雨，正需要，谢谢分享

15623788285 发表于 2020-11-10 20:24:19

能否生成边界后删除填充

依然小小鸟 发表于 2020-11-12 08:50:39

以后没准用得着 留个脚印

magicheno 发表于 2021-9-10 01:02:37

ㄘ丶转裑ㄧ灬 发表于 2020-2-28 08:39


好用学习了

htlaser 发表于 2021-12-26 16:37:17

15623788285 发表于 2020-11-10 20:24
能否生成边界后删除填充

(defun C:tt (/ sg i s1)
(princ "\n填充重生边框，请选择填充图案：")
(setq sg (ssget '((0 . "HATCH"))) i -1)
(while (setq s1 (ssname sg (setq i (1+ i))))
    (command "-hatchedit" s1 "b" "p" "y")
                (entdel s1)
   )
(princ)
)

qazxswk 发表于 2024-5-10 19:01:52

本帖最后由 qazxswk 于 2024-5-10 19:05 编辑

高版本中有个hatchgenerateboundary，从哪个版本开始有的，我不知道了，可以直接生成没有关联的填充边界线。
(vl-cmdf"hatchgenerateboundary" (ssget ":S"))
页: 1 [2]
查看完整版本: 批量生成填充图形边界