Source position: rlutils.pas line 90
procedure CenterPoints(
var aPoints: array of TPoint;
const aRect: TRect
);