Source position: extgraphics.pas line 65
procedure PaintTriangular(
Canvas: TCanvas;
const PaintRect: TRect;
RadAngle: Extended = 0.0;
RightLeftFactor: extended = 0.5
);