[R] GUI boutons image ?

[Mikaas]

Bonjour, bonsoir

Voila j'ai un autre souci pour ne pas changer
j'essai de créer un(e) GUI avec 3 images qui effectuerons chacune une action une fois cliqué es ce possible ?

par ailleurs mon souci c'est que mes images n'apparaissent pas sur ma GUI...

► Afficher le textemon code

Code : Tout sélectionner

#RequireAdmin

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

$TITRE = GUICreate("MODULE SESSION WINDOWS", 451, 161, 195, 124)
$PIC1 = GUICtrlCreatePic(@ScriptDir & "\1.jpg", 17, 19, 96, 96, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
$PIC2 = GUICtrlCreatePic(@ScriptDir & "\2.jpg", 177, 19, 96, 96, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
$PIC3 = GUICtrlCreatePic(@ScriptDir & "\3.jpg", 337, 19, 96, 96, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
$PSEUDO = GUICtrlCreateLabel("AS_MODERATEUR", 6, 143, 206, 13)
GUICtrlSetFont(-1, 8, 800, 0, "Arial")
GUICtrlSetColor(-1, 0x0000FF)
GUISetState(@SW_SHOW, $PIC1)

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

une idée ?

Merci beaucoup pour l'aide apportée.

[pop45]

pourais tu mettre les image dans un .zip sil teu plait

[Mikaas]

oui bien sur

[Narmeke]

Tu veux vraiment savoir purquoi tes images ne s'affiche pas ?
Et bien regarde bien ton code :

Code : Tout sélectionner

$PIC1 = GUICtrlCreatePic(@ScriptDir & "\1[color=#FF0000].jpg[/color]", 17, 19, 96, 96, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
$PIC2 = GUICtrlCreatePic(@ScriptDir & "\2[color=#FF0000].jpg[/color]", 177, 19, 96, 96, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
$PIC3 = GUICtrlCreatePic(@ScriptDir & "\3[color=#FF0000].jpg[/color]", 337, 19, 96, 96, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
 

Tu as mis l'extension .jpg or tes images sont en .png !
Autoit ne gère pas les images .png par défault donc il va falloir que tu fasse une des deux choses suivante :
- Tu trouve une fonction qui permettra d'afficher les images au format .png
- Tu change l'extension des images .png en .jpg ! Il n'y aura plus de transparence au niveau des images !

[Mikaas]

dans mon zip elles sont en png mais j'ai déjà testé les même en jpg et jpeg

[Narmeke]

Attds je vais tester !

Pour informations :

► Afficher le texte

jpg et jpeg c'est la même chose

[Narmeke]

Désoler pour le double post

Voilà le script :

GUI Boutton Image.zip

Ton script

(49.63 Kio) Téléchargé 83 fois

L'erreur venait du format de l'image puis de :

Code : Tout sélectionner

GUISetState(@SW_SHOW, $PIC1)
 

Cela ne servait a rien ici !
Sans le $PIC1, c'est pour afficher la GUI avec tous ce quelle contient !

Et pour finir, si tu veux une réaction lors du click sur une image tu fais :

Code : Tout sélectionner

Case $PIC1
     ;Les actions
Case $PIC2
     ;Idem etc...
 

P.S : Pour indiquer le chemin de l'image tu a fais :

Code : Tout sélectionner

 
@ScriptDir&"\1.jpg"
 

Ce n'est pas faux mais tu n'est pas obliger d'indiquer :

Code : Tout sélectionner

@ScriptDir
 

Tu peux faire plus court :

Code : Tout sélectionner

"1.jpg"
 

[Mikaas]

cool merci beaucoup
toujours aussi efficace

[Narmeke]

Derien !

Si résolut, editez votre premier post afin de changer la balise [..] en [R]

[Mikaas]

Derien !

Si résolut, editez votre premier post afin de changer la balise [..] en [R]

déjà fait avant même de poster les remerciements
question d'habitude