Desabilitar Botao

[Fernando_Ramos]

Amigos,

eu possuo um botão, que ao carregar o form ele esta desativado, eu queria saber como fazer quando o usuario digitar alguma coisa num edit habilitar o botao, e se apagar o conteudo do edit voltar ao modo de desabilitado.

obrigado!!

[Progr'amador]

Assim:

no OnChange do Edit:

procedure TForm1.Edit1Change(Sender: TObject);
begin
  if Edit1.text <> '' then
     Button1.Enabled := True
  else Button1.Enabled := False;
end;

Abs. Progr'amador.