ColorBox - убрать лишнее

[MyLastHit]

Здравствуйте. Пожалуйста подскажите как в ColorBox убрать ненужные мне цвета? К примеру мне нужны цвета только палитры Pascal TextAtr
Белый
Черный
Желтый
Синий
Пурпурный
Голубой
Красный
Зеленый
Можно как то исключить ненужные цвета?

[SERG1980]

в св-ве Style поставте всё в false

implementation

{$R *.dfm}
 const Colr: array [1..3]of TColor = (clGreen,clred,clblue);
procedure TForm1.FormCreate(Sender: TObject);
var i:integer;
begin
 for i:=1 to High(Colr) do
  ColorBox1.AddItem(ColorToString(Colr[i]),TObject(Colr[i]));
end;

end.