TIECanvas.GradientFillRect

Declaration

procedure GradientFillRect(aRect: TRect; Dir: TIEGDIPlusGradient = gpgVertical);
procedure GradientFillRect(aRect: TRect; FromColor, ToColor: TColor; Dir: TIEGDIPlusGradient = gpgVertical);

Description

Fill an area with a gradient.

With first overload:
◼ From Color is specified by Brush.Color and Brush.Transparency
◼ To Color is specified by Brush.BackColor and Brush.BackTransparency

Example

// Fill image with a vertical gradient from Red to Blue
ImageEnView1.IEBitmap.IECanvas.GradientFillRect( Rect( 0, 0, ImageEnView1.IEBitmap.Width, ImageEnView1.IEBitmap.Height ), clRed, clBlue, gpgVertical );
ImageEnView1.Update();

See Also

◼ IEDrawGradientToComboListBoxItem

---