ImageEn, unit hsvbox

THSVBox

THSVBox

Declaration

THSVBox = class(TCustomControl);

Description

THSVBox is a visual control that allows selection of a color in the HSV (Hue-Saturation-Value) color space.

Methods and Properties

Properties

Published Property  Background
Published Property  BarsDistance
Published Property  Blue
Published Property  Color
Published Property  Green
Published Property  Hue
Published Property  HueBarWidth
Published Property  Red
Published Property  Sat
Published Property  Val

Methods

Public Method  GetColorAt
Public Method  SetColor
Public Method  SetRGB

Events

Event  OnChange

Example

HSVBox1.OnChange := HSVBox1Change;
HSVBox1.SetColor(clTeal);

procedure TForm1.HSVBox1Change(Sender: TObject);
begin
  Label1.Caption := Format('RGB: %d, %d, %d', [HSVBox1.Red, HSVBox1.Green, HSVBox1.Blue]);
end;