Discussion :

[nassu]

Bonjour,
j'ai cherché au sein de ce forum pour résoudre mon probleme , et malheureusement je n'arrive pas a trouver de solution.
si l'un de vous peux m'aider ?

mon probleme est que j'ai FORM1 qui est l'interface principale qui contien un bouton a qui j'ai envie d'affecter une commande pour dés qu'on clique FORM1 se ferme et ouvre FORM2.
comment faire ?

merci

[cincap]

@ Nassu, si j'ai bien compris, il suffit de faire ceci :

Form1 et Form2 avec un TButton sur chaque form.

Sur form1 dans le Onclick du Tbutton :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
implementation
 
uses Unit2;
 
procedure TForm1.Button1Click(Sender: TObject);
begin
form1.Hide;
form2.show;
end;

Sur form2 dans le Onclick du Tbutton :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
implementation
 
uses Unit1;
 
procedure TForm2.Button1Click(Sender: TObject);
begin
form2.Hide;
form1.show;
end;

@+,

Cincap

[nassu]

merci , c'est exactement ce que je cherchais , et comment faire pour quitter complètement l'application ?

[Charly910]

Bonjour,

pour fermer l'appli, soit tu fermes la Form principale :

Form1.close ;

Soit tu fais Application.terminate ;

@+

Charly

[nassu]

parfait merci.