Source position: JvJVCLUtils.pas line 212
procedure GradientFillRect(
Canvas: TCanvas;
ARect: TRect;
StartColor: TColor;
EndColor: TColor;
Direction: TFillDirection;
Colors: Byte
);