OnSelect

// Главная форма
frm=new TForm();
frm.Caption="JS+ - событие компонента TColorBox OnSelect";
frm.Width =525;
frm.Height=375;

// Строка состояния
stb=new TStatusBar(frm);

// Метка
lbl=new TLabel(frm);
lbl.Left=15;
lbl.Caption="Выбран цвет:";

// ColorBox
clb=new TColorBox(frm);
clb.Left=lbl.Left+lbl.Width+10;
clb.Top =15;
clb.Width=frm.ClientWidth-clb.Left-15;
clb.OnSelect=clb_Select;

lbl.Top=clb.Top+(clb.Height-lbl.Height)/2;

// Панель
pnl=new TPanel(frm);
pnl.BorderStyle=bsSingle;
pnl.Left=lbl.Left;
pnl.Top =clb.Top+clb.Height+10;
pnl.Width=frm.ClientWidth-pnl.Left*2;
pnl.Height=stb.Top-pnl.Top-clb.Top;
pnl.Color=clb.Selected=clWhite;

clb_Select(clb);
frm.ShowModal();

// Обработчик события OnSelect
function clb_Select(clb)
{
  var i=clb.ItemIndex;

  pnl.Color=clb.Selected;
  pnl.SetFocus();
  stb.SimpleText=" Выбран цвет: "+
  clb.Items[i]+" ("+pnl.Color.toHColor()+")";
}