hl2006 发表于 2010-10-14 19:08:00

<div><img src="file:///C:/Documents%20and%20Settings/Administrator/Application%20Data/Tencent/Users/252601919/QQ/WinTemp/RichOle/4[GNT1F3W06E4Q6CQ0B6Z(T.jpg"/>&nbsp;
<div><img src="file:///C:/Documents%20and%20Settings/Administrator/Application%20Data/Tencent/Users/252601919/QQ/WinTemp/RichOle/Y$@4~IMPE_$BC9YXHN81R47.jpg"/>&nbsp;这两个图是指填充后和填充前的效果.但我感觉命令中的填充只是选择了图形最外面这个图形进行填充的.而图形内部和外部是一个整体,比如下面这个图上的铃铛是是一个单个的图形,我需要填充时的效果就像CAD中的填充选择了整个铃铛的填充效果.</div></div>

hl2006 发表于 2010-10-14 19:09:00

辛苦大哥了啊

gufeng 发表于 2010-10-15 11:42:00

图片呢，都没显示出来的？

hl2006 发表于 2010-10-17 13:12:00

<p>我在发一次试试看</p>

hl2006 发表于 2010-10-17 14:06:00

我发不上来图片，咋办啊。我那天发了一个我们的图纸，可以下载下来试试这个的命令。主要是填充的问题。

hl2006 发表于 2010-10-17 14:18:00

hl2006 发表于 2010-10-17 14:19:00

上面绿色的为命令填充的效果，下面这张是我们想达到的效果。

hl2006 发表于 2010-10-17 14:20:00

注意上面还有个小点没填充上和字母的显视

hl2006 发表于 2010-10-17 14:23:00

在发一个可以试命令的CAD图档

ZZXXQQ 发表于 2010-10-17 14:50:00



(defun c:tt ()
(setvar "CMDECHO" 0)
(princ "\n选择封闭复线 :")
(if (setq ss (ssget '((0 . "*POLYLINE") (-4 . "<OR") (70 . 1) (70 . 129) (-4 . "OR>"))))
(command "HATCH" "SOLID" ss "")
)
(setvar "CMDECHO" 1)
(princ)
)

页: 1 2 3 4 5 6 [7] 8 9 10 11
查看完整版本: 跪求一LISP程序