Cambiar El Fondo De Un Edit

[aeff]

bueno, según lo que preguntas...

..como Cambio El Color De Fondo De Un Edit Por Medio De Codigo Al Oprimir Un Boton..

te puedo dar la siguiente referencia, en el evento OnClick de un Button coloca esto:

Código Delphi [-]
Edit1.Color := clRed;

pero si lo que quieres es cambiar el color de fonde de un Edit si no tiene textos escritos, entonces de la siguiente manera:

Código Delphi [-]
if TRIM(Edit1.Text) = '' then
  Edit1.Color := clRed;

pero si deseas un procedimiento para calcular de todos los Edit de una Form cual es el que no tiene textos escritos y cambiar su color de fondo, entonces, implementa esto:

Código Delphi [-]
procedure ValidarEn(aForm: TForm; aColorVacio, aColorEscrito: TColor);
var
  vIndex: Integer;
begin
  for vIndex := 0 to aForm.ComponentCount -1 do
    if  aForm.Components[vIndex] is TEdit then
      case Length(TRIM((aForm.Components[vIndex] as TEdit).Text)) of
        0:  (aForm.Components[vIndex] as TEdit).Color := aColorVacio;
        else
            (aForm.Components[vIndex] as TEdit).Color := aColorEscrito;
      end;
end;

y en el evento OnClick de un Button, coloca esto:

Código Delphi [-]
ValidarEn(Form1, clRed, clWhite);

te sirve de algo mi ayuda???
espero que si!

saludos!
aeff!