Reference TSaturationPicker

  TSaturationPicker = class(TCustomColorControl)
  protected
    function GetColorValue: TColorB; override;
    procedure SetColorValue(Value: TColorB); override;
    procedure ChangeMouse(X, Y: Integer); override;
    procedure Draw; override;
  public
    { Create a new saturation picker }
    constructor Create(AOwner: TComponent); override;
    { The selected color }
    property ColorValue: TColorB read GetColorValue write SetColorValue;
  published
    { The hue from 0 to 1 }
    property Hue: Single read FHue write SetHue;
    { The selected saturation from 0 to 1 }
    property Saturation: Single read FSaturation write SetSaturation;
    { The selected lightness from 0 to 1 }
    property Lightness: Single read FLightness write SetLightness;
    { How the picker varies its colors }
    property Style: TSaturationStyle read FStyle write SetStyle;
    property Align;
    property Anchors;
    property BorderSpacing;
    property Constraints;
    property DragCursor;
    property DragKind;
    property DragMode;
    property Enabled;
    property ParentShowHint;
    property OnChange;
    property OnChangeBounds;
    property OnDblClick;
    property OnDragDrop;
    property OnDragOver;
    property OnEndDock;
    property OnEndDrag;
    property OnMouseDown;
    property OnMouseEnter;
    property OnMouseLeave;
    property OnMouseMove;
    property OnMouseUp;
    property OnMouseWheel;
    property OnMouseWheelDown;
    property OnMouseWheelUp;
    property OnPaint;
    property OnResize;
    property OnStartDock;
    property OnStartDrag;
    property ShowHint;
    property Visible;
  end;