ColorBar изменение цвета

[Vladya]

Как написать код так что-бы при выборе цвета в колор баре, менялся цвет поля RichEdit?

[VVM]

Не совсем понял что имеется в виду под колор баром, но могу предложить такой вариант:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if not ColorDialog1.Execute then
    exit;
  RichEdit1.Color := ColorDialog1.Color;
end;