[R] Fermer une fenetre sans fermer le programme

[jperardel]

Bonjour!

Encore quelque petites choses que je n'arrive pas à comprendre avec les GUI :

1. comment fermer une fenêtre sans fermer le programme (ou sans fermer les autres fenetre deja ouverte)???
j'ai essayé avec winclose qui d'après les explications pouvait le faire.... mais il me ferme quand même tout le programme!!

2. Comment ouvrir une fenetre qui bloque toute les autres fenetre tant qu'elle n'est pas fermée?
j'aimerai que les utilisateurs puissent taper un login et un mot de passe, sans pouvoir revenir sur le programme tant qu'il n'ont pas fini, ou annulé.

merci d'avance!

[Tlem]

Peut-être que ceci devrait vous aider : Référence GUI

[BastienDvpSta]

Voici le code pour fermer des fenêtres secondaire ouvert depuis une fenêtre principal correspondant a l'application

Solution provenant BigDod sur le forum anglais

Code : Tout sélectionner

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

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Main Window", 217, 132, 406, 212)
$MenuItem1 = GUICtrlCreateMenuItem("About",-1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $MenuItem1
            _About()
    EndSwitch
WEnd

Func _About()

#Region ### START Koda GUI section ### Form=
$Form2 = GUICreate("About", 178, 166, 366, 246)
GUISetIcon("D:\006.ico")
$GroupBox1 = GUICtrlCreateGroup("", 8, 8, 161, 105)
$Label1 = GUICtrlCreateLabel("Hello", 16, 32, 132, 68)
GUICtrlSetFont(-1, 40, 400, 0, "MS Sans Serif")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("&OK", 48, 128, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            GUIDelete($Form2)
    EndSwitch
WEnd

EndFunc;==> _About()

[mikell]

C'est gentil...
Toutefois si l'auteur du message n'a pas remis les pieds sur le forum depuis 8 ans c'est probablement qu'il a trouvé la solution entre-temps

Merci de ne pas exhumer des sujets préhistoriques