[求助] 怎样才能得到一个2D图形的几何中心
我想知道怎样才能得到一个2D图形的几何中心，是任意形状的，但是在VBA中找不到我需要的算法，只找到一个求质心的。在这里请教一下，有人知道怎么计算吗？可以的话提供一下详细的算法，或者有这种算法的地方。不胜感激！！！谢谢~~~谢谢~~~~~！！！ Obj.GetBoundingBox MinPoint, MaxPoint
X0=(MinPoint(0)+MaxPoint(0))/2
Y0=(MinPoint(1)+MaxPoint(1))/2
回复
如图:考虑先得到质心,然后将质心在水平或竖直方向上移动,直到移到<b>合适</b>位置.
如果外接矩形的width > height, 则上下移动;
如果height > width, 则左右移动.
页:
[1]