[R] Problème image de fond

[walkixx]

Bonjours,
Ma calculette marche bien, sauf que je veut faire en sorte que les gens puissent
choisir leur image de fond et c'est la qu'est le problème. Il vont sélectionner leur image
et puis appuyer sur Ok sauf que la la calculatrice apparait mais pas d'image de fond.
Voici le code:

► Afficher le texte

Code : Tout sélectionner

 Local $resultat = 0, $nombre1, $nombre2, $operateur, $background, $choix_design, $image 

#include <GUIConstants.au3>

$Design = GUICreate("Calculatrice by Walkixx", 150, 180, 193, 125)
$Reborn = GUICtrlCreateRadio("Reborn", 5, 0, 75, 33)
$Naruto = GUICtrlCreateRadio("Naruto", 5, 32, 50, 33)
$OnePiece = GUICtrlCreateRadio("OnePiece", 5, 64, 75, 33)
$Sakura = GUICtrlCreateRadio("Sakura", 5, 96, 50, 33)
$Autre = GUICtrlCreateRadio("choisis ton fond", 5, 128, 100, 33)
$boutton_validation = GUICtrlCreateButton("OK", 90, 70, 50, 26, 0)

$Choix = GUICreate("Copyrighter une image", 399, 121, 192, 124)
$Label1 = GUICtrlCreateLabel("Mon image :", 24, 24, 66, 17)
$Input1 = GUICtrlCreateInput("", 88, 24, 209, 21)
$Parcourir = GUICtrlCreateButton("Parcourir", 304, 25, 60, 20)
$Ok = GUICtrlCreateButton("OK", 160, 50, 50, 50)

restart()
Func restart() ; debut de la fonction restart
    $Calculatrice = GUICreate("Calculatrice by Walkixx", 500, 500, 350, 200)
    GUISetIcon("C:\Users\nathan\Desktop\calculatrice-mathematiques-icone-6281-128.ico")
    GUISetFont(10, 400, 0, "Comic Sans MS")
    $nombre1 = GUICtrlCreateInput("", 12, 8, 100, 26)
    $nombre2 = GUICtrlCreateInput("", 224, 8, 100, 26)
    $operateur = GUICtrlCreateCombo("", 120, 8, 97, 21)
    GUICtrlSetData(-1, "x (multiplication)|/ (division)|+ (addition)|- (soustraction)|^ (puissance)|Sqrt (racine carré)")
    $boutton_egal = GUICtrlCreateButton("=", 336, 8, 100, 26, 0)
    $background = GUICtrlCreatePic("reborn.jpg", 0, 0, 500, 500)


    $Calculatrice2 = GUICreate("Calculatrice by Walkixx", 500, 500, 350, 200)
    GUISetIcon("C:\Users\nathan\Desktop\calculatrice-mathematiques-icone-6281-128.ico")
    GUISetFont(10, 400, 0, "Comic Sans MS")
    $nombre1 = GUICtrlCreateInput("", 12, 8, 100, 26)
    $nombre2 = GUICtrlCreateInput("", 224, 8, 100, 26)
    $operateur = GUICtrlCreateCombo("", 120, 8, 97, 21)
    GUICtrlSetData(-1, "x (multiplication)|/ (division)|+ (addition)|- (soustraction)|^ (puissance)|Sqrt (racine carré" & @CRLF & "le nombre2 ne compte pas)  ")
    $boutton_egal = GUICtrlCreateButton("=", 336, 8, 100, 26, 0)
    $background2 = GUICtrlCreatePic("naruto.jpg", 0, 0, 500, 500)

    $Calculatrice3 = GUICreate("Calculatrice by Walkixx", 500, 500, 350, 200)
    GUISetIcon("C:\Users\nathan\Desktop\calculatrice-mathematiques-icone-6281-128.ico")
    GUISetFont(10, 400, 0, "Comic Sans MS")
    $nombre1 = GUICtrlCreateInput("", 12, 8, 100, 26)
    $nombre2 = GUICtrlCreateInput("", 224, 8, 100, 26)
    $operateur = GUICtrlCreateCombo("", 120, 8, 97, 21)
    GUICtrlSetData(-1, "x (multiplication)|/ (division)|+ (addition)|- (soustraction)|^ (puissance)|Sqrt (racine carré" & @CRLF & "le nombre2 ne compte pas)  ")
    $boutton_egal = GUICtrlCreateButton("=", 336, 8, 100, 26, 0)
    $background3 = GUICtrlCreatePic("onepiece.jpg", 0, 0, 500, 500)

    $Calculatrice4 = GUICreate("Calculatrice by Walkixx", 500, 500, 350, 200)
    GUISetIcon("C:\Users\nathan\Desktop\calculatrice-mathematiques-icone-6281-128.ico")
    GUISetFont(10, 400, 0, "Comic Sans MS")
    $nombre1 = GUICtrlCreateInput("", 12, 8, 100, 26)
    $nombre2 = GUICtrlCreateInput("", 224, 8, 100, 26)
    $operateur = GUICtrlCreateCombo("", 120, 8, 97, 21)
    GUICtrlSetData(-1, "x (multiplication)|/ (division)|+ (addition)|- (soustraction)|^ (puissance)|Sqrt (racine carré" & @CRLF & "le nombre2 ne compte pas)  ")
    $boutton_egal = GUICtrlCreateButton("=", 336, 8, 100, 26, 0)
    $background = GUICtrlCreatePic("sakura.jpg", 0, 0, 500, 500)

    $Calculatrice5 = GUICreate("Calculatrice by Walkixx", 500, 500, 350, 200)
    GUISetIcon("C:\Users\nathan\Desktop\calculatrice-mathematiques-icone-6281-128.ico")
    GUISetFont(10, 400, 0, "Comic Sans MS")
    $nombre1 = GUICtrlCreateInput("", 12, 8, 100, 26)
    $nombre2 = GUICtrlCreateInput("", 224, 8, 100, 26)
    $operateur = GUICtrlCreateCombo("", 120, 8, 97, 21)
    GUICtrlSetData(-1, "x (multiplication)|/ (division)|+ (addition)|- (soustraction)|^ (puissance)|Sqrt (racine carré)")
    $boutton_egal = GUICtrlCreateButton("=", 336, 8, 100, 26, 0)
    $background = GUICtrlCreatePic("" &$image, 0, 0, 500, 500)
    GUISetState(@SW_SHOW, $Design)
    #EndRegion ### END Koda GUI section ###

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

            Case $boutton_egal 
                calcule()
                GUIDelete() 
                restart()

            Case $Reborn
                GUISetState(@SW_SHOW, $Calculatrice)
                GUISetState(@SW_HIDE, $Design)
            Case $Naruto
                GUISetState(@SW_SHOW, $Calculatrice2)
                GUISetState(@SW_HIDE, $Design)
            Case $OnePiece
                GUISetState(@SW_SHOW, $Calculatrice3)
                GUISetState(@SW_HIDE, $Design)
            Case $Sakura
                GUISetState(@SW_SHOW, $Calculatrice4)
                GUISetState(@SW_HIDE, $Design)
            Case $Autre
                GUISetState(@SW_SHOW, $Choix)
                GUISetState(@SW_HIDE, $Design)
            Case $Parcourir
                $image = FileOpenDialog("Choisir l'image à copyrighter", @MyDocumentsDir, "Toutes les images(*.jpg;*.png;*.bmp;*.gif;*.dxf;*.eps;*.pcx;*.wpg;*.pict)")
                GUICtrlSetData($Input1, $image)
            Case $Ok
                GUISetState(@SW_SHOW, $Calculatrice5)
                GUISetState(@SW_HIDE, $Choix)
        EndSwitch
    WEnd
EndFunc   
Func calcule() 
    $nombre1 = GUICtrlRead($nombre1) 
    $nombre2 = GUICtrlRead($nombre2) 
    $operateur = GUICtrlRead($operateur) 
    If $operateur = "+ (addition)" Then $resultat = $nombre1 + $nombre2 
    If $operateur = "- (soustraction)" Then $resultat = $nombre1 - $nombre2 
    If $operateur = "x (multiplication)" Then $resultat = $nombre1 * $nombre2 
    If $operateur = "/ (division)" Then $resultat = $nombre1 / $nombre2 
    If $operateur = "^ (puissance)" Then $resultat = $nombre1 ^ $nombre2 
    If $operateur = "Sqrt (racine carré)" Then $resultat = Sqrt($nombre1) 
    MsgBox(64, "Calculatrice by Walkixx", "le resultat est: " & $resultat)
EndFunc  

Si quelqu'un peut m'expliquer pourquoi sa ne marche pas sa serait sympa.
Merci.

[sylvanie]

Bonsoir,
dans la partie case $ok, il manque le set du background :

Code : Tout sélectionner

            Case $Ok
                $file_pic=GUICtrlRead($Input1)
                If FileExists($file_pic) Then
                    GUICtrlSetImage($background,$file_pic)
                    GUICtrlSetState($background,$GUI_DISABLE)
                EndIf
                GUISetState(@SW_SHOW, $Calculatrice5)
                GUISetState(@SW_HIDE, $Choix)
 

Par contre, il faut créer $background en premier avant les autres controles dans la construction de la GUI, afin que ces derniers "restent" en avant plan lors du changement d'image (sinon il faut repasser la souris sur les contrôles pour les refaire apparaître). de même faites un GUICtrlSetState($background,$GUI_DISABLE) après sa création pour que l'image ne bloque pas les autres contrôles

[walkixx]

Merci,
mais je ne comprend pas comment l'ordi va savoir quel image afficher en fond .

[sylvanie]

et bien dans votre code vous avez :

Code : Tout sélectionner

 Case $Parcourir
                $image = FileOpenDialog("Choisir l'image à copyrighter", @MyDocumentsDir, "Toutes les images(*.jpg;*.png;*.bmp;*.gif;*.dxf;*.eps;*.pcx;*.wpg;*.pict)")
                GUICtrlSetData($Input1, $image)
 

à la suite de ceci le nom du fichier est envoyé comme valeur à $Input1

Dans ce que j'ai ajouté, on relit à nouveau ce nom de fichier

Code : Tout sélectionner

$file_pic=GUICtrlRead($Input1)
 

puis ensuite, on test si le fichier existe bien et on fait un guictrlsetimage ...

[walkixx]

donc si j'ai bien compris sa donne sa :

► Afficher le texte

Code : Tout sélectionner

Local $resultat = "Erreur!", $nombre1, $nombre2, $operateur, $background, $choix_design, $image ; declaration des variables

#include <GUIConstants.au3>

$Design = GUICreate("Calculatrice by Walkixx", 150, 180, 193, 125)
$Reborn = GUICtrlCreateRadio("Reborn", 5, 0, 75, 33)
$Naruto = GUICtrlCreateRadio("Naruto", 5, 32, 50, 33)
$OnePiece = GUICtrlCreateRadio("OnePiece", 5, 64, 75, 33)
$Sakura = GUICtrlCreateRadio("Sakura", 5, 96, 50, 33)
$Autre = GUICtrlCreateRadio("choisis ton fond", 5, 128, 100, 33)
$boutton_validation = GUICtrlCreateButton("OK", 90, 70, 50, 26, 0)

$Choix = GUICreate("Copyrighter une image", 399, 121, 192, 124)
$Label1 = GUICtrlCreateLabel("Mon image :", 24, 24, 66, 17)
$Input1 = GUICtrlCreateInput("", 88, 24, 209, 21)
$Parcourir = GUICtrlCreateButton("Parcourir", 304, 25, 60, 20)
$Ok = GUICtrlCreateButton("OK", 160, 50, 50, 50)

restart()
Func restart() 
    $Calculatrice = GUICreate("Calculatrice by Walkixx", 500, 500, 350, 200)
    $background = GUICtrlCreatePic("reborn.jpg", 0, 0, 500, 500)
    GUICtrlSetState($background, $GUI_DISABLE)
    GUISetIcon("C:\Users\nathan\Desktop\calculatrice-mathematiques-icone-6281-128.ico")
    GUISetFont(10, 400, 0, "Comic Sans MS")
    $nombre1 = GUICtrlCreateInput("", 12, 8, 100, 26)
    $nombre2 = GUICtrlCreateInput("", 224, 8, 100, 26)
    $operateur = GUICtrlCreateCombo("", 120, 8, 97, 21)
    GUICtrlSetData(-1, "x (multiplication)|/ (division)|+ (addition)|- (soustraction)|^ (puissance)|Sqrt (racine carré)")
    $boutton_egal = GUICtrlCreateButton("=", 336, 8, 100, 26, 0)

    $Calculatrice2 = GUICreate("Calculatrice by Walkixx", 500, 500, 350, 200)
    $background2 = GUICtrlCreatePic("naruto.jpg", 0, 0, 500, 500)
    GUICtrlSetState($background, $GUI_DISABLE)
    GUISetIcon("C:\Users\nathan\Desktop\calculatrice-mathematiques-icone-6281-128.ico")
    GUISetFont(10, 400, 0, "Comic Sans MS")
    $nombre1 = GUICtrlCreateInput("", 12, 8, 100, 26)
    $nombre2 = GUICtrlCreateInput("", 224, 8, 100, 26)
    $operateur = GUICtrlCreateCombo("", 120, 8, 97, 21)
    GUICtrlSetData(-1, "x (multiplication)|/ (division)|+ (addition)|- (soustraction)|^ (puissance)|Sqrt (racine carré" & @CRLF & "le nombre2 ne compte pas)  ")
    $boutton_egal = GUICtrlCreateButton("=", 336, 8, 100, 26, 0)

    $Calculatrice3 = GUICreate("Calculatrice by Walkixx", 500, 500, 350, 200)
    $background3 = GUICtrlCreatePic("onepiece.jpg", 0, 0, 500, 500)
    GUICtrlSetState($background, $GUI_DISABLE)
    GUISetIcon("C:\Users\nathan\Desktop\calculatrice-mathematiques-icone-6281-128.ico")
    GUISetFont(10, 400, 0, "Comic Sans MS")
    $nombre1 = GUICtrlCreateInput("", 12, 8, 100, 26)
    $nombre2 = GUICtrlCreateInput("", 224, 8, 100, 26)
    $operateur = GUICtrlCreateCombo("", 120, 8, 97, 21)
    GUICtrlSetData(-1, "x (multiplication)|/ (division)|+ (addition)|- (soustraction)|^ (puissance)|Sqrt (racine carré" & @CRLF & "le nombre2 ne compte pas)  ")
    $boutton_egal = GUICtrlCreateButton("=", 336, 8, 100, 26, 0)

    $Calculatrice4 = GUICreate("Calculatrice by Walkixx", 500, 500, 350, 200)
    $background = GUICtrlCreatePic("sakura.jpg", 0, 0, 500, 500)
    GUICtrlSetState($background, $GUI_DISABLE)
    GUISetIcon("C:\Users\nathan\Desktop\calculatrice-mathematiques-icone-6281-128.ico")
    GUISetFont(10, 400, 0, "Comic Sans MS")
    $nombre1 = GUICtrlCreateInput("", 12, 8, 100, 26)
    $nombre2 = GUICtrlCreateInput("", 224, 8, 100, 26)
    $operateur = GUICtrlCreateCombo("", 120, 8, 97, 21)
    GUICtrlSetData(-1, "x (multiplication)|/ (division)|+ (addition)|- (soustraction)|^ (puissance)|Sqrt (racine carré" & @CRLF & "le nombre2 ne compte pas)  ")
    $boutton_egal = GUICtrlCreateButton("=", 336, 8, 100, 26, 0)

    $Calculatrice5 = GUICreate("Calculatrice by Walkixx", 500, 500, 350, 200)
    $background = GUICtrlCreatePic("", 0, 0, 500, 500)
    GUICtrlSetState($background, $GUI_DISABLE)
    GUISetIcon("C:\Users\nathan\Desktop\calculatrice-mathematiques-icone-6281-128.ico")
    GUISetFont(10, 400, 0, "Comic Sans MS")
    $nombre1 = GUICtrlCreateInput("", 12, 8, 100, 26)
    $nombre2 = GUICtrlCreateInput("", 224, 8, 100, 26)
    $operateur = GUICtrlCreateCombo("", 120, 8, 97, 21)
    GUICtrlSetData(-1, "x (multiplication)|/ (division)|+ (addition)|- (soustraction)|^ (puissance)|Sqrt (racine carré)")
    $boutton_egal = GUICtrlCreateButton("=", 336, 8, 100, 26, 0)
    GUISetState(@SW_SHOW, $Design)
    #EndRegion ### END Koda GUI section ###

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

            Case $boutton_egal 
                calcule()
                GUIDelete() 
                restart()

            Case $Reborn
                GUISetState(@SW_SHOW, $Calculatrice)
                GUISetState(@SW_HIDE, $Design)
            Case $Naruto
                GUISetState(@SW_SHOW, $Calculatrice2)
                GUISetState(@SW_HIDE, $Design)
            Case $OnePiece
                GUISetState(@SW_SHOW, $Calculatrice3)
                GUISetState(@SW_HIDE, $Design)
            Case $Sakura
                GUISetState(@SW_SHOW, $Calculatrice4)
                GUISetState(@SW_HIDE, $Design)
            Case $Autre
                GUISetState(@SW_SHOW, $Choix)
                GUISetState(@SW_HIDE, $Design)
            Case $Parcourir
                $image = FileOpenDialog("Choisir l'image à copyrighter", @MyDocumentsDir, "Toutes les images(*.jpg;*.png;*.bmp;*.gif;*.dxf;*.eps;*.pcx;*.wpg;*.pict)")
                GUICtrlSetData($Input1, $image)
            Case $Ok
                $file_pic = GUICtrlRead($Input1)
                If FileExists($file_pic) Then
                    GUICtrlSetImage($background, $file_pic)
                    GUICtrlSetState($background, $GUI_DISABLE)
                EndIf
                GUISetState(@SW_SHOW, $Calculatrice5)
                GUISetState(@SW_HIDE, $Choix)
        EndSwitch
    WEnd
EndFunc   
Func calcule() 
    $nombre1 = GUICtrlRead($nombre1) 
    $nombre2 = GUICtrlRead($nombre2) 
    $operateur = GUICtrlRead($operateur) 
    If $operateur = "+ (addition)" Then $resultat = $nombre1 + $nombre2 
    If $operateur = "- (soustraction)" Then $resultat = $nombre1 - $nombre2 
    If $operateur = "x (multiplication)" Then $resultat = $nombre1 * $nombre2 
    If $operateur = "/ (division)" Then $resultat = $nombre1 / $nombre2 
    If $operateur = "^ (puissance)" Then $resultat = $nombre1 ^ $nombre2 
    If $operateur = "Sqrt (racine carré)" Then $resultat = Sqrt($nombre1) 
    MsgBox(64, "Calculatrice by walkixx", "le resultat est: " & $resultat)
EndFunc

mais pour l'image de fond s'afficherait??

[sylvanie]

Et bien ce code est onctionnel.
Si vous cochez "choisis ton fond', puis parcourrir ... et ok l'image s'affiche bien .

[walkixx]

Moi sur mon ordi l'image ne s'affiche pas . je test sur un autre ordi.
Sur un autre ordi sa marche je ne sais pas se qu'a le mien.

Merci beaucoup.

[sylvanie]

attention à la restriction suivante :
supported types BMP, JPG, GIF

[walkixx]

ok merci j'y ferai attention =)