Cacher une fenêtre et en montrer une autre

[Dagger]

Bonjour a tous, aujourd'hui je vais vous montrez comment cacher une fenêtre et en montrer une autres. Pour cela nous allons utiliser les fonctions "@SW_SHOW" qui permet d'afficher une fenêtre et la fonction "@SW_HIDE" qui permet de ne pas afficher une fenêtres au lancement du programme.

Bien nous allons commencer la pratique, nous allons donc créer deux fenêtres une qui aura le statut "@SW_SHOW" et la seconde aura le statut "@SW_HIDE". Une fenêtres aura deux boutons, un qui affichera les deux fenêtres et l'autre cachera la fentre et affichera la seconde. Pareil pour la deuxième fenêtre, 1 bouton qui affichera les deux fenetres et un autre qui cachera la fenêtre et affichera la seconde.

Voici le code de depart :

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Global $Form1 = GUICreate("Form1", 117, 84, 1068, 285)
Global $Button1 = GUICtrlCreateButton("Tous montrer", 8, 8, 75, 25, $WS_GROUP)
Global $Button2 = GUICtrlCreateButton("Montrer 2eme fenetre", 8, 40, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)

Global $Form2 = GUICreate("Interface 1", 117, 81, 1068, 507)
Global $Button3 = GUICtrlCreateButton("Tous montrer", 8, 8, 75, 25, $WS_GROUP)
Global $Button4 = GUICtrlCreateButton("Montrer 1 fentre", 8, 40, 75, 25, $WS_GROUP)
GUISetState(@SW_HIDE)

While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit

 EndSwitch
WEnd

Maintenant occupons nous des boutons de la première fenêtre. Avec le premier boutons on va afficher les deux fenêtres.

Ajoutons donc ceci:

Case $Button1
	   GUISetState(@SW_SHOW, $Form2)

Maintenant occupons nous du deuxième boutons de la première fenêtre, nous voulons la cacher et faire apparaitre la deuxième, nous allons donc rajouter ceci:

Case $Button2
			GUISetState(@SW_HIDE, $Form1)
			GUISetState(@SW_SHOW, $Form2)

Bon occupons nous maintenant de la deuxième fenêtres nous avons donc pour le premier bouton la même chose que le premier bouton de la première fenêtre sauf que nous allons mettre "Form1 au lieu de "Form2", ce qui donne sa:

Case $Button3
			GUISetState(@SW_SHOW, $Form1)

Et pour le dernier bouton nous allons donc faire pareil que pour le deuxième bouton de la première fenêtres mais a l'inverse. Ce qui nous donne ceci:

		Case $Button4
			GUISetState(@SW_HIDE, $Form2)
			GUISetState(@SW_SHOW, $Form1)

Ce qui donne au final ceci:

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Global $Form1 = GUICreate("Form1", 117, 84, 1068, 285)
Global $Button1 = GUICtrlCreateButton("Tous montrer", 8, 8, 75, 25, $WS_GROUP)
Global $Button2 = GUICtrlCreateButton("Montrer 2eme fenetre", 8, 40, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)

Global $Form2 = GUICreate("Interface 1", 117, 81, 1068, 507)
Global $Button3 = GUICtrlCreateButton("Tous montrer", 8, 8, 75, 25, $WS_GROUP)
Global $Button4 = GUICtrlCreateButton("Montrer 1 fentre", 8, 40, 75, 25, $WS_GROUP)
GUISetState(@SW_HIDE)

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			GUISetState(@SW_SHOW, $Form2)
		Case $Button2
			GUISetState(@SW_HIDE, $Form1)
			GUISetState(@SW_SHOW, $Form2)
		Case $Button3
			GUISetState(@SW_SHOW, $Form1)
		Case $Button4
			GUISetState(@SW_HIDE, $Form2)
			GUISetState(@SW_SHOW, $Form1)
	EndSwitch
WEnd

Voili voilou a+ =D​

 

[Nociif]

Ouai... C'est vrai pour les débutants-débutants !

 

[Dagger]

Ben oui xD J'ai jamais dis que c'étais pour les programmeur expérimenter

 

[KyuuShuu*]]

Si tu veux augmenter la difficulté du script, tu peux toujours créer un effet de transition entre les deux GUI.
Notamment un effet aéro.
Mais bon, je te laisse chercher tout ça =p

 

[[I]Pod]

Merci à toi Dagger