线段闭合问题

fyt234 · 发表于 2003-6-26 10:38:00

我现在有四条线段呈矩形放置，线段端点间距基本固定，现在想把四条线连成一个矩形，并转换为一个面，可以做到吗？该怎么做呢？

李勇 · 发表于 2003-6-26 11:11:00

先求得矩形放置四条线段的相领边的交点，然后改变每条线的首尾端点，使其首尾端点在各自的交点上。再用AddRegion(ObjectList)，就可以创建面了。求交点的vba函数，论坛上有。

fyt234 · 发表于 2003-6-26 11:49:00

我是先做了一个面，然后炸开成四条L线，我现在想把四条线变为一个矩形，每个图形里面有几百个这样的东东，怎么一次全部处理完呢？

李勇 · 发表于 2003-6-26 17:56:00

在cad绘图菜单中有一个边界命令，在对象类型中选择面域，然后选择“拾取点”，在你的图形中的每个面内点一下，面域就构成了。不过这种方法必须要你一个一个的去选择。还是有点麻烦。我想，几百个这样的东东，20分钟不到就可以搞定的