请教怎么用代码来改变字体的颜色

请问如何用代码来改变字体的颜色？
我是想当鼠标放到label1上时,label1上面的文字的颜色就变成红色。
procedure   Tmonimain.Label1MouseEnter(Sender:   TObject);
begin
font.Color:= 'clred ';
end;

编绎时提示错误如下：
[Error]   w_monimain.pas(3892):   Incompatible   types:   'TColor '   and   'String '

请问应如何改，谢谢。

[解决办法]
那你试试，Font.Color := clred呀;
[解决办法]
Incompatible types: 'TColor ' and 'String '类型不匹配，TColor是一个枚举类型，clred已经是TColor的一个值了，引号引起来是画蛇添足，就是string了。