Problema Con Cambio De Color De Label

[ANDRES86]

Hola a todos, mi problema es el siguiente, estoy cambiandole la propiedad color y caption a un label por codigo, pero me cambia el color mas no la propiedad caption.

Código Delphi [-]
if Edit1.Text = 'RED' then
  Label1.Font.Color:=ClRED;
  Label1.Caption:='RED';
if Edit1.Text = 'BLUE' then
  Label1.Font.Color:=ClBlue;
  Label1.Caption:='Blue';
if Edit1.Text = 'GREEN' then
  Label1.Font.Color:=ClGreen;
  Label1.Caption:='GREEN';

Siempre el label queda con la palabra green, los colores si funcionan; pero, las demas palabras nunca se muestran, mi pregunta es si esto esta mal hecho o es que se hace de otra forma.

[dec]

Hola,

Utiliza el "begin", puesto que a cada "condición" le van a corresponder varias instrucciones:

Código Delphi [-]
if Edit1.Text = 'RED' then
begin
  Label1.Font.Color:=ClRED;
  Label1.Caption:='RED';
end
else
if Edit1.Text = 'BLUE' then
begin
  Label1.Font.Color:=ClBlue;
  Label1.Caption:='Blue';
end
else
if Edit1.Text = 'GREEN' then
begin
  Label1.Font.Color:=ClGreen;
  Label1.Caption:='GREEN';
end;