if ComboBox1.ItemIndex = 4 then begin Form3.Color:=clBlack; Form3.Label1.Font.Color:=clWhite; Form3.Label2.Font.Color:=clWhite; Form3.Label3.Font.Color:=clWhite; end;