Font Color ändern

[Versus]

Delphi-Quellcode:

     Farben:=edit1.Text;    //Spieler1
Farben2:=edit2.Text;    //Spieler2
  Farben3:=label6.Caption;  //Wo die Spieler stehen
  if Farben3=Farben2 then
  begin
   Button3.Font.color:=(clred);
    Button4.Font.color:=(clred) ;
     Button5.Font.color:=(clred)   ;
      Button6.Font.color:=(clred)  ;
       Button7.Font.color:=(clred)   ;
        Button8.Font.color:=(clred)   ;
         Button9.Font.color:=(clred)   ;
          Button10.Font.color:=(clred)  ;
           Button11.Font.color:=(clred)  ;
            Button12.Font.color:=(clred)   ;
  end
    else
    begin
    button3.Font.Color:=(clgreen);
     button4.Font.Color:=(clgreen);
      button5.Font.Color:=(clgreen);
       button6.Font.Color:=(clgreen);
        button7.Font.Color:=(clgreen);
         button8.Font.Color:=(clgreen);
          button9.Font.Color:=(clgreen);
           button10.Font.Color:=(clgreen);
            button11.Font.Color:=(clgreen);
             button12.Font.Color:=(clgreen);

    end;

Bei mir passiert gar nichts mach ich was falsch ? Danke, schon mal im vor raus.

Edit: Falls Leute die gleichen Probleme haben.