Discussion :

[CreedApollo]

Salut tout le monde,
Je veux savoir comment Activer un Button quand un Edit est rempli et le contraire, comment le désactiver quand le Edit est vide
Merci...

[Papy214]

en utilisant l'evenement OnChange du TEdit
activer le bouton ou non selon le contenu du tedit

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
procedure TForm3.Edit1Change(Sender: TObject);
begin
  Button1.Enabled := Trim(TEdit(Sender).Text) <> EmptyStr;
end;

[CreedApollo]

ça n'as pas marché

[tourlourou]

Est-ce à dire que le statut du bouton n'était pas le bon après changement de la valeur de l'Edit ?
Ou que ce statut ne reflétait pas la valeur du TEdit, à un moment donné, sans qu'elle ait changé ?
Dans ce dernier cas, comment est remplie la valeur Text du TEdit ? Par une méthode qui ne déclenche pas son OnSchange ?