Colorear dbedit

[cojones]

Mi problema es q intento q si el contenido es 0 se me ponga en rojo pero me da error el clred y clwindows algien sabe porq? q ago mal?

Código Delphi [-]
procedure TFormPrincipal.DBEdit2Change(Sender: TObject);
begin
if(DBEdit2.Text = '0')then
   DbEdit2.Color := clRed
else
     DbEdit2.Color := clWindow;
end;