Soucis avec Image et CommandButtom

Bonjour à tous,

Je fais de nouveau appel à vous et vos connaissances, car je n'ai pas trouvé la réponse ailleurs (net, ou la librairie MSDN) :cry:

Je vous expose mon soucis : J'aimerai insérer une image dans un "bouton" (j'ai vu que de basse on pouvais l'initialiser, c'est ce que j'ai testé = OK) mais peut-on changer l'image en code avec une action...

le principe de mon bout de programme est lorsque je sélectionne un ChecBox, l'image du bouton doit changer,... :pastaper: malheureusement ca ne fonctionne pas (voir code ci-dessous).

Autre question, en initialisation une image dans le bouton je n'arrive pas à supprimer l'image, à part de mettre le mode "Style" en mode 0-Standart au lieu du mode 1-Graphical, peut-on supprimer l'image tout simplement ???

Bon vous avez compris que si je pose la question, c'est que je n'ai pas réussi

je vous mets à dispo mon bout de code...

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

'*****************************************************************************' ' Evenement : Clic sur le choix du navigateur ' Action : affiche une image dans la touche et efface les autres sélection '*****************************************************************************' Private Sub Choix_GC_Click()   'Déselection des choix navigateur '-------------------------------- Choix_MF.Value = 0 Choix_IE.Value = 0   'affichage l'image dans la touche '-------------------------------- Cmd_Contact.Picture = "C:\Documents and Settings\Administrateur\Bureau\Perso\Images\chrome2.jpg"   End Sub

---

Si vous avez une solus, une suggestion, un tuto, un exemple, etc, je suis preneur :ave::ave::ave:
En tout cas merci de m'avoir déjà lu.

Amicalement Philou

utilise loadpicture ...:

Code:

---

Cmd_Contact.Picture = LoadPicture("C:\Documents and Settings\Administrateur\Bureau\Perso\Images\chrome2.jpg")

---

Citation:

---

Autre question, en initialisation une image dans le bouton je n'arrive pas à supprimer l'image, à part de mettre le mode "Style" en mode 0-Standart au lieu du mode 1-Graphical, peut-on supprimer l'image tout simplement ???

---

dans l'éditeur VB, pour le champ picture tu sélectionne le texte (bipmap) et tu actionne la touche "Suppr"... tout simplement..

Si j'ai bien compris, tu veux supprimer l'image pendant l'exécution.

Si c'est le cas, tu dois écrire :

Code:

---

Cmd_Contact.Picture = LoadPicture("")

---

Merci à vous deux pour vos réponses, ca marche Nickel :ccool:, mais y a un mais :mur::mur::mur:...

Maintenant j'ai un autre soucis qui à avoir avec ce sujet, mais ou je ne comprends pas les erreurs car pour un exemple ca marche, et pour les autres ca fonctionne plus, :arf: non ????


Voilà j'ai 3 ChexBox qui me permette de définir une image différente dans un même CommandButton, si je sélectionne le premier j'ai la bonne image qui apparait, mais si je sélectionne les autres, j'ai une erreur sur le chargement de l'image alors que c'est les images sont dans le même dossier.... Voici un printscreen de défaut que j'ai à l'exécution de mon programme

http://img413.imageshack.us/img413/5...ementimage.jpg

Ci-dessous le code qui marche

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

'*****************************************************************************' ' Evenement : Clic sur le choix du navigateur ' Action : affiche une image dans la touche et efface les autres sélection '*****************************************************************************' Private Sub Choix_IE_Click()   'Déselection des choix navigateur '-------------------------------- Choix_MF.Value = 0 Choix_GC.Value = 0   'affichage l'image dans la touche '-------------------------------- If Choix_IE.Value = 1 Then Cmd_Contact.Picture = LoadPicture("C:\Documents and Settings\Administrateur\Bureau\Perso\Images\ie.bmp") Else Cmd_Contact.Picture = LoadPicture("") End If   End Sub

---

et ci-dessous le code qui me fait l'erreur : Ne pige

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22

'*****************************************************************************' ' Evenement : Clic sur le choix du navigateur ' Action : affiche une image dans la touche et efface les autres sélection '*****************************************************************************' Private Sub Choix_MF_Click()   'Déselection des choix navigateur '-------------------------------- Choix_IE.Value = 0 Choix_GC.Value = 0     'affichage l'image dans la touche '-------------------------------- If Choix_MF.Value = 1 Then Cmd_Contact.Picture = LoadPicture("C:\Documents and Settings\Administrateur\Bureau\Perso\Images\Mozilla_firefox.bmp") Else Cmd_Contact.Picture = LoadPicture("") End If   End Sub

---

Si vous des remarques, des suggestions, des idées, je suis preneur car la je vois pas puisque c'est le même code.... :aie:

Amicalement Philou

bonsoir,

as-tu comparé tes 2 images : taille, résolution ....

Sorry pour la réponse tardive,

Voici les caractéristique des images :

pour l'image qui s'affiche dans le CommandButton les dimension sont les suivante : résolution : 300x300 ; fichier de bitmap (.bmp)

pour les 2 autres images : résolution 128x128 et toujours fichier de type bitmap (.bmp)...

Ce que je ne comprends pas, c'est que les 2 autres images sont de taille plus petites, donc normalement cela devrait fonctionné, non ?!?. Ou bien c'est la première image chargée qui définit la résolution pour les autres ? Surtout que je ne définis pas d'image au lancement de cette séquence :cfou: (initialisation de la Form). Je suis un peu perdu...

Autre question qui me vient : Comment créer un répertoire qui répertorie toutes mes images utilisé dans mon programme, voir chemin d'accès, ceci pour la finalisation de projet... (utilisation par la suite sur un autre PC)

Merci de m'avoir lu, et si vous avez des suggestions, idées, ou autres, elles sont les bienvenues :ccool:

Amicalement Philou

Le mieux est de les inclure dans ton programme non ?
Deux possibilitités, soit les stocker dans un fichier ressource, soit les mettre dans des picturebox avec la propriété visible à false.

Pour le problème des bmp, peut être est ce du au nombre de couleurs dans les images. Il me semble que les boutons ne peuvent pas aller au dela des 256 couleurs. Fais un test avec paint, charge y tes bmp, puis enregistre les au format bitmap 256 couleurs.

Un grand merci à toi Delbeke,

J'ai reconverti mes 2 autres images en .bmp avec une limite de 256 couleurs et cette fois cela marche nickel. :ccool:

:merci:

Merci de m'avoir lu et aider à résoudre mon soucis

Amicalement Philou