Guest User

Tuto gr4ph0s

a guest
Jun 26th, 2013
153
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 1.25 KB | None | 0 0
  1. #cs
  2. Code source du tuto http://www.dailymotion.com/video/xf3kqc_tuto-autoit-multi-gui-mode-messagel_tech#.UcttHsEi5po
  3.  
  4. Tuto sur la création d'une MultiGUi en mode MessageLoop par ptifou78 aka Gr4ph0s/sea78
  5. #ce
  6.  
  7. #include <ButtonConstants.au3>
  8. #include <GUIConstantsEx.au3>
  9. #include <WindowsConstants.au3>
  10. #Region ### START Koda GUI section ### Form=
  11. $GUI1 = GUICreate("GUI1", 489, 201, 690, 271)
  12. $but_1_gui = GUICtrlCreateButton("Big Button :P", 40, 24, 401, 145, $WS_GROUP)
  13. GUICtrlSetFont(-1, 36, 800, 0, "Myriad Pro")
  14. GUISetState(@SW_SHOW)
  15. #EndRegion ### END Koda GUI section ###
  16.  
  17. While 1
  18.     $nMsg = GUIGetMsg()
  19.     Switch $nMsg
  20.         Case $GUI_EVENT_CLOSE
  21.             Exit
  22.  
  23.         Case $but_1_gui
  24.             $GUI2 = GUICreate("GUI2", 461, 214, 192, 124)
  25.             $but_ferme_GUI2 = GUICtrlCreateButton("Fermé notre 2e GUI", 48, 48, 377, 105, $WS_GROUP)
  26.             GUICtrlSetFont(-1, 14, 400, 0, "Myriad Pro")
  27.             GUISetState(@SW_SHOW)
  28.  
  29.             While 1
  30.                 $nMsg = GUIGetMsg(1)
  31.                 Select
  32.                     Case $nMsg[0] = $GUI_EVENT_CLOSE AND $nMsg[1] = $GUI2
  33.                         GUIDelete($GUI2)
  34.                         ExitLoop
  35.  
  36.                     Case $nMsg[0] = $GUI_EVENT_CLOSE AND $nMsg[1] = $GUI1
  37.                         Exit
  38.  
  39.                     Case $nMsg[0] =  $but_ferme_GUI2
  40.                         GUIDelete($GUI2)
  41.                         ExitLoop
  42.                 EndSelect
  43.             WEnd
  44.  
  45.  
  46.     EndSwitch
  47. WEnd
Advertisement
Add Comment
Please, Sign In to add comment