TBGRASimpleGradient

type TBGRASimpleGradient = class(TBGRACustomGradient)

protected

  FColor1: TBGRAPixel;

  FColor2: TBGRAPixel;

  ec1: TExpandedPixel;

  ec2: TExpandedPixel;

  FRepetition: TBGRAGradientRepetition;

  function InterpolateToBGRA(); virtual; abstract;

  function InterpolateToExpanded(); virtual; abstract;

public

  class function CreateAny();

  constructor Create();

  function GetColorAt(); override;

  function GetColorAtF(); override;

  function GetExpandedColorAt(); override;

  function GetExpandedColorAtF(); override;

  function GetAverageColor; override;

  function GetAverageExpandedColor; override;

  function GetMonochrome; override;

  property Repetition: TBGRAGradientRepetition; [rw]

end;

TBGRASimpleGradient

TBGRACustomGradient

TObject