关于bhatch命令

whu_sl_lt

请教一下，在Lisp中利用(command ".bhatch" ------)命令时，能不能选择多个


对象进行填充？

meflying

不管怎么样，用法同命令在命令行使用是一样的。。。

whu_sl_lt

你的意思是说我必须在程序运行期间由鼠标选择图中的元素?

cqnj023

飞哥不会是这个意思，是说的用法的对应关系，图中的实体是可以用选择集传递的。

meflying

你自己为什么不肯试试呢？能，或者不能，答案不就有了吗

梁旭武

(defun c:lxw()
(setq ss(ssget))
(setq i 0)
(repeat (sslength ss)
(setq ss1(ssname ss i))
(command "bhatch" "s" ss1 "" "")
(setq i(1+ i))
)
) 这样可以了，但注意填充比例现在是用默认值的， 飞哥:能不能求出被填充闭合多边形内部的一个点的坐标，这个点要求落在 这个多边形之内最好是在中心位置，这样就可以连面积一起计算并输出了

cqnj023

梁旭武发表于2004-6-7 13:14:00(defun c:lxw()(setq ss(ssget))(setq i 0)(repeat (sslength ss)(setq ss1(ssname ss i))(command \"bhatch\" \"s\" ss1 \"\" \"\")(setq i(1+...

实际上你上面的程序中的ss内单个对象必须是闭合的实体，否则会出错，若程序中已经规定所选的实体为闭合对象，求面积是可以不用中心点的。当然，若需求的面积是多个对象围合成的区域，能知道内部点最好

梁旭武

哪楼上能否求出闭合多边形的内部的点最好是中心点了。传一个过来给小生嘛！！！

spring

龙斑竹有写过求出闭合多边形的中心点，自己搜索一下吧

梁旭武

可能找是找不到的了，我和斑竹又不是很熟。这样就难了！