[R] Problème d'image (rafraichissement) dans une Gui

[DJSIR]

Bonjour.
Voila j'ai un petit problème. J'ai deux images que se ressemblent :
1. "install_autoit_1.jpg"
2. "install_autoit_2.jpg"
Sur la 2. il n'y a qu'une différence : 2 lettres "OK" en plus de l'image 1.
Et quand je met ma Gui, la première image se place bien mais quand je clique sur le bouton pour affichier la 2ème rien ne sa passe. il faut que je glisse une autre fênêtre par dessus pour voir les chngements de l'image !

Pourquoi ?

[timmalos]

IL va etre très dur de te repondre si tu ne simplifie pas ton code, ne nous donne pas des images pour pouvoir tester, et j'ai l'impression qu'il y a des choses de bizarres...

[DJSIR]

Choses Bizzares ?

Images :

Code Simplifié :

Simplifié.au3

(3.29 Kio) Téléchargé 210 fois

[DJSIR]

Personne ne sait ?

[Tlem]

Ben disons que votre code est des plus étrange ...
- Vous faite une boucle dans un Case d'une boucle.
- Vous créez des contrôles pour les supprimer aussitôt.
- Vous supprimez un contrôle pour en créer un nouveau avec un autre nom.
- Vous mélangez le mode normal et le mode événementiel.

Tout ça fait que votre code est relativement complexe et difficile à lire.
En ce qui concerne votre problème, je vous propose une amélioration de cette partie du code comme ceci :

► Afficher le texteNouveau Code

Code : Tout sélectionner

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

Opt("GUIOnEventMode", 1)  ; On passe le script en mode événement.

; Noms des fichiers image.
Dim $pic = ("install_autoit_1.jpg")
Dim $pic2 = ("install_autoit_2.jpg")
Dim $pic3 = ("install_autoit_3.jpg")
Dim $pic4 = ("install_2.jpg")
Dim $splash = ("splash.jpg")

; Création de la Gui
$Form1 = GUICreate("iSafari INSTALLER", 641, 516, -1, -1, $WS_EX_LAYERED, $WS_EX_TOOLWINDOW)
; Activation de la fonction sortie() en cas de sortie de la GUI
GUISetOnEvent($GUI_EVENT_CLOSE, "sortie")
GUISetBkColor(0xFFFFFF)

; Création de l'image de fond.
$Img = GUICtrlCreatePic($pic, 0, 0, 641, 310)

; Création du bouton.
$Button = GUICtrlCreateButton("Commencer l'installation", 435, 453, 180, 24)
; Activation de la fonction Install() en cas de clic sur le bouton.
GUICtrlSetOnEvent(-1, "Install")

; Création de l'InputBox.
$Input = GUICtrlCreateInput("", 35, 257, 180, 24)
; On rend l'inputBox invisible.
GUICtrlSetState (-1, $GUI_HIDE)

; On affiche la GUI.
GUISetState(@SW_SHOW)


; Boucle d'attente (Ne rien rajouter dedans)
While 1
    Sleep(50)
WEnd


Func Install()
    ; Si le bouton est le 1er bouton :
    If GUICtrlRead($Button) = "Commencer l'installation" Then ; Si le bouton est le 1er bouton.
        GUICtrlSetState($Input, $GUI_SHOW) ; On affiche l'InputBox
        GUICtrlSetData($Button, "") ; Mise à blanc du bouton.
        $Folder = FileSelectFolder("Choisir le dossier d'installation de iSafari :", @ProgramFilesDir) ; Choix destination
        GUICtrlSetData($Input, $Folder) ; On affiche la destination dans l'inputBox
        GUICtrlSetData($Button, "Installer iSafari") ; On change le texte du bouton.
        GUICtrlSetImage($Img, $pic2) ; On change l'image de fond.
    
    ; Sinon si le bouton est le deuxième bouton.
     ElseIf GUICtrlRead($Button) = "Installer iSafari" Then
        ; Début de l'installation de iSafari
        GUICtrlSetData($Button, "") ; Mise à blanc du bouton.
        SplashTextOn("", "Installation en cours", 450, 70, -1, -1, 0 + 1 + 16 + 32, "Verdana", 10, 800)
        Sleep(1000)
        SplashTextOn("", "Finalisation", 450, 70, -1, -1, 0 + 1 + 16 + 32, "Verdana", 10, 800)
        Sleep(3000)
        SplashOff()
        GUICtrlSetData($Button, "Quitter") ; On change le texte du bouton.
                        
; ################################################################################
; Je ne sais pas en quoi consiste cette partie puisqu'il me manque les images !!!!
; De plus il y à une incohérence avec $pic3 ...
;       $pic5 = GUICtrlCreatePic($pic4, 0, 0, 641, 76)  
;       GUICtrlDelete($pic5)
;       $pic3 = GUICtrlCreatePic($pic3, 0, 0, 641, 379)
; ################################################################################
        
    ; Sinon ...
    Else
        sortie()
    EndIf   
EndFunc


Func sortie()
    Exit
EndFunc
 

Voilà, j'espère que ça vous aidera à améliorer le reste de votre code.

[DJSIR]

Merci Tlem. Il est vrai que je n'ai pas beacoup expliqué mon code. Alors voilà, toi tu l'as "décrypté" car ainsi que quelques autres personnes tu t'y connais vraimant bien en langage autoit. Je vais juste expliquer 2 ou 3 trucs :

Tlem a dit :
- Vous créez des contrôles pour les supprimer aussitôt.
- Vous supprimez un contrôle pour en créer un nouveau avec un autre nom.
Réponse : J'ai essayé de mettre une image "bateau" plus petite que l'image 1 de façon a ce que tout s'efface et remette une autre image.

Code : Tout sélectionner

        [color=#800000]$pic4 = GUICtrlCreatePic($pic4, 0, 0, 641, 76)
        GUICtrlDelete ($pic4)   [/color] Image avec juste le bleu en haut.      
        $pic2 = GUICtrlCreatePic($pic2, 0, 0, 641, 310)
 

Tlem a aussi dit :
- Vous faite une boucle dans un Case d'une boucle.
- Vous mélangez le mode normal et le mode événementiel.
Réponse : La j'ai pas compris

Tlem avait dit aussi sur le post précédant le mien :
Ben disons que votre code est des plus étrange ...
Vais-je entrer dans le livre des records du forum (s'il y en a un ?)

Et pour terminer :
J'avais écris un méssage privé a Minoui et j'avais fait ceci :

http://www.oeil-bionik.com/iSafari/BETA%20FUN/
Cela ressemble a Windows Live Wave 3 tu ne trouve pas

Cela est le nouvel installateur de iSafari... avec Quick Menu Builder (on ne peut pas faire cela avec AutoIt, si oui cela m'interresse).
Du coup j'avais besoin d'aide pour ce probleme de "rafraichisement"

Merci Tlem

PS : Je ne connaisais pas la fonction GUICtrlSetData, grâce a toi et a l'aide Autoit j'ai pu découvrir cette fonction !

[Tlem]

Tlem a aussi dit :
- Vous faite une boucle dans un Case d'une boucle.
- Vous mélangez le mode normal et le mode événementiel.
Réponse : La j'ai pas compris

Hé bien en fait, lorsque l'on veut capturer des messages système (clic de bouton, fermeture de GUI, etc ...) il n'est pas recommandé de créer une boucle dans une boucle car la boucle principale va devenir 'prisonnière' de la seconde. Bien sur cela dépend du contexte, et en l'occurrence dans votre cas elle n'est absolument pas recommandée.

Tlem avait dit aussi sur le post précédant le mien :
Ben disons que votre code est des plus étrange ...
Vais-je entrer dans le livre des records du forum (s'il y en a un ?)

Hélas, pas de livre des records, donc vous ne serez pas félicité.

[DJSIR]

O.K. Je comprend mieux avec une petite explication... Merci