Ver Mensaje Individual
  #1  
Antiguo 05-06-2011
Parabol77 Parabol77 is offline
Miembro
NULL
 
Registrado: oct 2010
Posts: 10
Reputación: 0
Parabol77 Va por buen camino
Condicional cuando un TEdit está vacío

Buenas a todos,

estoy diseñando un programa y estoy teniendo un problema, aparentemente muy tonto.

Mi programa consta de un TEdit y un botón. Quiero poner la condición de que, si el TEdit está vacío, el botón aparezca como desactivado.

He hecho esto:

Código:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin

   If Edit1.Text='' Then Button1.Enabled:=False;

end;
Pero no funciona.

Agradecería cualquier tipo de ayuda.

Muchas gracias de antemano.
Un saludo.
Responder Con Cita