Source position: extgraphics.pas line 79
procedure PaintHalfEllipse(
Canvas: TCanvas;
const PaintRect: TRect;
AHalfEllipseDirection: TShapeDirection
);