Reference TBannerBackground

  TBannerBackground = class(TChangeNotifier)
  public
    { Create a new banner background }
    constructor Create;
    destructor Destroy; override;
    { Draw the background on a surface }
    procedure Draw(Surface: ISurface);
  published
    { The background color, or the color used to tint the image }
    property Color: TColor read FColor write SetColor;
    { Darken the color below 0.5 or lighten it above 0.5 }
    property ColorBalance: Float read FColorBalance write SetColorBalance;
    { The height of the background when there is no image }
    property Height: Integer read FHeight write SetHeight;
    { An optional background image }
    property Image: TSurfaceBitmap read FImage write SetImage;
    { Darken the image below 0.5 or lighten it above 0.5 }
    property ImageBalance: Float read FImageBalance write SetImageBalance;
  end;