一个关于BCB程序中设置字体颜色的问题

我写了一个小程序需要设置字体的颜色，但在RichEdit组件属性中不知道如何设置，代码如下：
//以上代码省略
void __fastcall TForm36::kaiClick(TObject *Sender)
{
 Form37->RichEdit1->Font->Name="@Adobe 楷体 Std R";//设置字体格式，这样是对的
}
//---------------------------------------------------------------------------
void __fastcall TForm36::hongClick(TObject *Sender)
{
  Form37->RichEdit1->Font->Name="红色";//这样设置字体颜色却是错误的，将Name改成Color也不行
}
请问各位高手要如何设置，我用的是BCB2009，我将Font属性内容截一下各位看看，请各位高手指教