将多边形缩小为TPoint阵列?

Jer*_*dge 4 delphi drawing gradient polygon delphi-xe2

我正在利用TCanvas.Polygon()并想知道如何缩小多边形的大小,如果已经有一个函数,或者如何写一个.我有一个声明的类型TPoints: Array of TPoint;,并在调用时使用它TCanvas.Polygon().

麻烦的是,如果我写这个功能,它是如何识别哪些方向的每个点需要移动(基于比例多边形的其余部分)?

例如,如果我创建一个points(TPoints)数组来表示一个5角星,并且我需要将它缩小2个像素,那么它如何知道移动点的方向?

最终目的是为多边形实现渐变.将有一个循环来执行此操作,其中a)颜色稍微调整,b)多边形点需要缩小几个像素,并且c)多边形被绘制(小于先前绘制的多边形); 因此,创建一个渐变.

Ang*_*son 16

在我看来,你正在寻找一种方法来进行多边形偏移 - 按指定数量的单位(像素)缩小或扩展多边形.我的Clipper库(用Delphi,C++和C#编写)进行多边形偏移."点移动的方向"(即收缩或扩展)将取决于所提供的'delta'参数与OffsetPolygons函数的符号(正与负).

  • +1:我强烈推荐Clipper库. (7认同)