TRANSFERT INSTANTANÉ D'UNE VARIABLE ENTRE 2 UNITÉS.

pyroflo Messages postés 323 Date d'inscription lundi 24 février 2003 Statut Membre Dernière intervention 17 mai 2005 - 26 janv. 2004 à 17:13
nethacker Messages postés 288 Date d'inscription mardi 2 mai 2006 Statut Membre Dernière intervention 12 octobre 2011 - 24 juil. 2008 à 19:22
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/19799-transfert-instantane-d-une-variable-entre-2-unites

nethacker Messages postés 288 Date d'inscription mardi 2 mai 2006 Statut Membre Dernière intervention 12 octobre 2011
24 juil. 2008 à 19:22
yep j'y ai pensé ! mais je croyais que y'avait une solution meilleure c'est pourquoi j'y suis allé sur votre source !
pyroflo Messages postés 323 Date d'inscription lundi 24 février 2003 Statut Membre Dernière intervention 17 mai 2005
26 janv. 2004 à 17:13
Evitons d'utiliser des variables inutiles:

procedure TForm1.EditDeForm1Change(Sender: TObject);
begin
form2.EditDeForm2.Text := form1.EditDeForm1.Text;
end;
end.

procedure TForm2.EditDeForm2Change(Sender: TObject);
begin
form1.EditDeForm1.Text := form2.EditDeForm2.Text;
end;
end.
Rejoignez-nous