Source position: extgraphics.pas line 78
procedure PaintFivePointLineStar(
Canvas: TCanvas;
const PaintRect: TRect
);