[R] Problème de boutons avec WinAnimate

[Sephy]

Bonsoir tout le monde,

Je me suis mis à AutoIt il y a quelques jours, et la je rencontre un petit problème. J'ai un GUI avec des input, radios et boutons. J'utilise la fonction WinAnimate donnée ici pour donner un effet de fade in quand le prog se lance. Mais le souci c'est que quand je mets cette fonction, les boutons ne fonctionnent plus !

Voila mon code actuellement :

► Afficher le texteCODE

Code : Tout sélectionner

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

;création de la fenetre
$window = GUICreate("test", 542, 423,-1,-1,$WS_BORDER)

;background
$rep = @SystemDir & "\temp"
DirCreate($rep)
FileInstall("bg.jpg",$rep & "\bg.jpg",1)
$bg = GUICtrlCreatePic($rep & "\bg.jpg",0,0, 542, 399)
GuiCtrlSetState(-1, $GUI_DISABLE)
DirRemove($rep,1)

;boutons
$ExitButton = GUICtrlCreateButton("Quitter", 246, 375, 50, 20)
$HelpButton = GUICtrlCreateButton("Aide", 480, 375, 50, 20)

;inputs
$Input_1 = GUICtrlCreateInput("Mon premier blabla", 50, 200, 444, 20)
$Input_2 = GUICtrlCreateInput("Mon second blabla", 50, 230, 444, 20)
$Input_3 = GUICtrlCreateInput("Mon troisieme blabla", 50, 260, 444, 20)
$Input_4 = GUICtrlCreateInput("Mon quatrieme blabla", 50, 290, 444, 20)
$Input_5 = GUICtrlCreateInput("Mon cinquieme blabla", 50, 320, 444, 20)

;radios
$radio_1 = GUICtrlCreateRadio("Aucun", 50, 340)
GUICtrlSetBkColor(-1,0xFFFFFF)
$radio_2 = GUICtrlCreateRadio("500", 150, 340)
GUICtrlSetBkColor(-1,0xFFFFFF)
$radio_3 = GUICtrlCreateRadio("1000", 250, 340)
GUICtrlSetBkColor(-1,0xFFFFFF)
$radio_4 = GUICtrlCreateRadio("1500", 350, 340)
GUICtrlSetBkColor(-1,0xFFFFFF)
$radio_5 = GUICtrlCreateRadio("2000", 450, 340)
GUICtrlSetBkColor(-1,0xFFFFFF)
GUICtrlSetState($radio_1, $GUI_CHECKED)

;on affiche la fenetre
_WinAnimate($window, $AW_FADE_IN, 1000)

    
While 1
    $Msg = GUIGetMsg()
    Select
        Case $msg = $ExitButton
            Exit
        Case $msg = $HelpButton
            MsgBox(0, "test help", "blablabla")
    EndSelect
WEnd

Sans la fonction WinAnimate mais avec un GUISetState à la place, les boutons fonctionnent comme il faut.

Si vous avez une solution, je suis preneur.

Merci d'avance.

[Tlem]

Il vous manque tout simplement le classique GUISetState(@SW_SHOW) juste avant la boucle While et juste après l'appel à _WinAnimate.

Lors de la création d'une GUI, il faut systématiquement et impérativement utiliser cette commande sous peine de ne pouvoir accéder à la GUI.

[Sephy]

En effet, c'est si bête que ça

Merci de votre aide.