Discussion :

[lenrok]

Bonjour à Tous,

J'utilise plusieurs TForm dans un programme. J'ai accès sur un TForm principal,à des données provenant d'autres TForm.
Ces données sont rapatriées soir par lecture de fichier ou soit par utilisation de variables déclarées en extern déclenché par l'action d'un TBouton . De ce côté pas de souci.
Par contre, n'existe-il pas une méthode de mise à jour de données ou par événements sur une fermeture de TForm.
Exemple :
TForm2 se ferme et mise à jour automatique de variable TEdit sur TForm1
Eviter l'action d'un TBouton...

à Tous de votre aide...

[DjmSoftware]

bonjour
en utilisant l'évènement OnCLose de ta Form
Cordialement

[lenrok]

Bonjour DjmSoftware,

Voici le code utilisé dans TForm2

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
20
21
22
23
24
25
26
27
28
29
30
31
32
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit2.h"
#include "Unit1.h"
 
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
 
extern AnsiString S;
extern AnsiString S1;
AnsiString S2;
 
__fastcall TForm2::TForm2(TComponent* Owner)
        : TForm(Owner)
{
  Form2->Width  =  Screen->Width;
  Form2->Height =  Screen->Height;
}
 
void __fastcall TForm2::Button1Click(TObject *Sender)
{
 Label1->Caption = S;
 Label2->Caption = S1;
}
 
void __fastcall TForm2::FormClose(TObject *Sender, TCloseAction &Action)
{
 S2 = Label3->Caption;
}

Dans le TForm1, dois-je passer par l'événement OnCreate, ou autre ?
TForm1 reste toujours en fenêtre active (fenêtre "Mère")
d'avance...

[Mattetfamilly]

Dans l'évènement OnClose de ta Form2 tu dois écrire les mise à jour qui doivent être faites sur le Form1, voici quelques exemples:

Code :

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

1
2
3
4
5
6
7
 
Form1->Edit1->Text=S;
Form1->Label3->Caption=S1;
Form1->ListBox2->Items->Add(S2);
Form1->StringGrid1->Cells[2][3]=S;  //Attention les coordonnées de Cellules
                                    //sont à modifier en fonction de 
                                    //l'utilisation de ta StringGrid

Attention au n° des composants qui doivent être modifiés en fonction de tes composants.

Autre possibilité:
La Form1 peut-elle être modifiée en même tant que la Form2?
Dans le cas contraire:
Dans la Form1, lors de l'affichage de la Form2:

Code :

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

1
2
3
4
5
6
7
8
9
10
 
Form2->ShowModal();//Cela permet de suspendre l'exécution de la Form1. 
                   //L'utilisateur doit faire les opérations qu'il a à faire dans la 
                   //Form2 avant de continuer à modifier la Form1
Edit1->Text=S;
Label3->Caption=S1;
ListBox2->Items->Add(S2);
StringGrid1->Cells[2][3]=S;  //Attention les coordonnées de Cellules
                             //sont à modifier en fonction de 
                             //l'utilisation de ta StringGrid

@+
Mattetfamilly

[lenrok]

Bonsoir Mattetfamilly,

pour les différents exemples

Tout fonctionne comme je le souhaitais...

à Tous