variable form1 à var form 2

**yazidou27** · 17/10/2010, 03h37

bonjour
jai une aplication avec 2 forms ,
jai 2 Edit sur ma 1ere form ,
jai une procedure sur ma 2eme form je veux la affecté les données du edit1 de la form 1 ,
exp:

Code :

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

1
2
3
4
5
procedure tfrom2.button1Click(Sender: TObject);
begin
           chatsocket1.Socket.SendText('msg,'+edit1.Text);
 
end;

merci.

**andreditdd** · 17/10/2010, 10h23

Code :

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

1
2
3
4
5
6
7
uses unit1;

procedure tfrom2.button1Click(Sender: TObject);
begin
           chatsocket1.Socket.SendText('msg,'+Form1.edit1.Text);
 
end;

**yazidou27** · 17/10/2010, 13h01

merci jai deja essai cet methode mai ca me donne une erreur de declaration

undeclared identifier 'edit1'

Envoyé par andreditdd

Code :

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

1
2
3
4
5
6
7
uses unit1;

procedure tfrom2.button1Click(Sender: TObject);
begin
           chatsocket1.Socket.SendText('msg,'+Form1.edit1.Text);
 
end;