Discussion :

[aliwassem]

on generale quand on utilise l'event OnChange pour un TEdit il faut que la nouvelle valeur differant de la 1ere valeur....

Code :

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

1
2
3
4
5
6
7
8
9
10
 
Procedure TForm1.Edit1OnChange(Sender:TObject);
begin
showmessage('salut');
end;
 
Procedure TForm1.Button1Onclick(Sender:TObject);
begin
Edit1.text := Edit2.text;
end;

alors est ce que je peux avoir le message Salut meme si les deux valeurs (nouvelle et precedent) sont egaux.

d'avance