图案填充创建边界

cqshan

水系图，河流是用图案填充做的，需要河流长度，但这个图案填充只是一段一段的，只要河流有汇入，那这个地方就断开了，算河流长度只能把每一段的图案填充创建边界，然后pe合并，一段一段太麻烦了，所以求论坛的高人们帮个忙，制作一个lsp，输入命令后，选择一段图案填充，自动创建成多段线类型的边界，。谢谢了。

Linhay

初学,只会这么多,希望能对你有点儿帮助

2. (defun C:hatchedge (/ ss ssn)
   
3.   (setq ss (ssget '((0 . "hatch"))))
   
4.   (setq i 0)
   
5. (repeat (sslength ss)
   
6.    (progn (setq ssn (ssname ss i))
   
7.     (command "-hatchedit" ssn  "b" "p" "n")
   
8.     )
   
9.    (setq i (1+ i))
   
10.   )
    
11. )

(defun C:hatchedge (/ ss ssn)<br />   (setq ss (ssget '((0 . "hatch"))))<br />   (setq i 0)<br /> (repeat (sslength ss)<br />    (progn (setq ssn (ssname ss i)) <br />     (command "-hatchedit" ssn  "b" "p" "n")<br />     ) <br />    (setq i (1+ i))<br />   )<br /> )

原地踏步

没留意到CAD还有这功能。学习了。