Source position: bctools.pas line 50
function CreateGradient(
AGradient: TBCGradient;
ARect: TRect
):TBGRAGradientScanner;