请教各位高手vba问题
本人遇到一个问题:polyline线为曲线拟合的线,想在拟合的曲线部分用逼近法增加点,形成一条新的线,在满足精度的要求下尽可能与原拟合的多义线重合。
问题是:在VBA中,如何得到曲线段的凸度,用.getbulge方法不行,因为是拟合的多义线。
得不到凸度就不能计算增加的点的坐标
请高手们指教。或有什么更好的办法、思路等。
大虾们怎么一个个沉默?请帮忙阿? 贴个图说明一下 用.Explode炸了多义线,拿一个Variant变量记录得到的所有线段,
再用循环,属性是圆弧就用.GetBulge(I)获得凸度,存到数组里面,最后再删掉炸开
的线段。
建议用曲线方程解出符合精度的点(比如弦高小于5毫米),生成多义线即可。从图形上选到的曲线也容易得到曲线方程 各位的方法不是很好,我知道arx有个方法可以读取拟合点的坐标,vb中是否也有类似的方法或属性吗?
或者是有更好的其它的方法吗?
请指教
页:
[1]