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 yellow to red
ImageEnView1.IEBitmap.IECanvas.GradientFillRect( Rect( 0, 0, ImageEnView1.IEBitmap.Width, ImageEnView1.IEBitmap.Height ), clYellow, clRed, gpgVertical );
ImageEnView1.Update();

See Also

◼IEDrawGradientToComboListBoxItem

---