récupérer info d'une 'sous' form

**astano** · 29/03/2006, 14h35

Salut à tous,

En fait j'ai une appli qui contient 2 forms où j'ai inclu le unit2 dans les uses de l'unit1. j'arrive bien à utiliser les fonctions de l'unit2 à partir de l'unit1, mais pas l'inverse.

J'ai essayé avec 'parent' mais il y a rien.

Comment faire? Merci, +

**MD Software** · 29/03/2006, 14h41

Tu parviens à utiliser les infos de l'unit2 dans l'unit1, parce que tu as ajouté unit2 dans les uses du unit1. Si tu veux l'inverse, il te faut inclure le sunit1 dans le uses du unit2 (attention aux cycles).

**jt-tronix** · 29/03/2006, 14h42

Et si tu mets Unit1 dans les Uses de Unit2, sa ne marche pas?

**Matt2094** · 29/03/2006, 14h47

Envoyé par jt-tronix

Et si tu mets Unit1 dans les Uses de Unit2, sa ne marche pas?

Si, justement, c'est ce qu'il faut faire ...

**Philippe Gormand** · 29/03/2006, 14h50

Bonjour.

Il faut que les deux unités se fassent référence l'une à l'autre.
Cependant les référence croisées sont interdites. Dans ce genre
d'écriture de code, il faut toujours considérer qu'il y a une fiche Maitre.

Exemple : Considérons l'unité 1 comme l'unité maitre.

Dans l'unité 1

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
Unit Unit1;
 
interface
 
Uses
      Windows, Unit2;  // fait référence à l'unité 2
 
 
Type
    TForm1 = class(TForm)
 
 
 
 
   end;
 
implementation

L'unité 2 doit faire référence à l'unité 1 sans référence croisée.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Unit Unit2;
 
interface
 
Uses
      Windows;
 
Type
    TForm1 = class(TForm)
 
 
 
 
   end;
 
implementation
 
uses Unit1;  // fait référence à l'unité 1

[/quote]