TCustomColorPickerGTK

type TCustomColorPickerGTK = class(TCustomColorPicker)

protected

  procedure PaintColorPicker; override;

  procedure MouseDown(); override;

  procedure MouseUp(); override;

  procedure MouseMove(); override;

  procedure SelectedColorChanged; override;

  property Radius: TFloat; [rw]

  property Center: TFloatPoint; [rw]

public

  constructor Create(); override;

  procedure Resize; override;

  property Hue: single; [rw]

  property Saturation: single; [rw]

  property Value: single; [rw]

  property VisualAid: TVisualAidGTK; [rw]

end;

TCustomColorPickerGTK

TCustomColorPicker

TObject