delphi中如何在colorbox下顯示規定的顏色

ColorBox1.Style:=[cbCustomColors];

a:=RGB(255,0,0);

b:=RGB(0,255,0);

c:=RGB(0,0,255);

ColorBox1.Items.AddObject('紅',TObject(a));

ColorBox1.Items.AddObject('lv',TObject(b));

剩下的自己寫.