CPointSortCompare = function (const item1, item2: CPoint): Integer;

GraphicsPointUnit

How do we sort the points????