UserForm et ImageList

[Lone-wolf]

Bonsoir à tous,

voilà, j'aimerais que l'on me dise si ce que j'ai fait est juste.

J'ai 4 sous dossiers (Gauche-Droite-Bas-Haut) contenant chacun 54 cartes. Dans le formulaire j'ai donc mis 4 ImageList contenant les images des sous-dossiers et que j'ai intégrer manuellement sans clés (facultatives).
Le noms des cartes est 1-2-3, jusqu'à 54.

Dans UserForm_Initialize(), j'ai écrit ceci:

Dim imgX As ListImage
Dim a, b, c, d As Byte
Randomize


Me.ImageList1.ListImages.Clear
Me.ImageList1.ImageHeight = 70
Me.ImageList1.ImageWidth = 52
For a = 1 To 54
???
Next a

Bien entendu le code n'est pas complet; je n'arrive pas à écrire la syntaxe exacte.

Pourriez-vous m'aider s'il vous plaît?

 

[Staple1600]

Re : UserForm et ImageList

Bonjour à tous

... Concernant le clic sur les images, Staple a mis un fichier; mais en regardant le formulaire en mode création, j'ai vu que c'était des boutons ...

Un module de classe peut se faire pour les images au lieu des boutons.

Mais sur coup là ,je n'ai pas le temps de m'y mettre pour le moment.

(Mais en cherchant ici, sur XLD ou ailleurs sur le world wide web, tu devrais trouver des exemples de module de classe spécifique à Picture )

 

[Habitude]

Re : UserForm et ImageList

Bon je te remets le fichier

Fait:
Le joueur peut changer de cartes
S'il change de carte, il doit payer le double de la mise de départ.
Pour miser, click de gauche sur les jetons augmente la mise, click de droite la diminue.
Je détermine le gagnant s'il est le seul à avoir le niveau de jeu.

à faire:
Déterminer le gagnant lorsque plus d'un joueur à le même niveau de jeu.
Ajouter l'IA pour les 3 autres joueurs
Ajuster les gains à chaque tour.


Bref il y a encore beaucoup de travail à faire et honnêtement le temps me manque.

 

[Lone-wolf]

Re : UserForm et ImageList

Bonjour Habitude,

merci infiniment pour le travail éffectué. Le projet n'est pas une urgence, ça peut attendre.

Ca serait bien si il y aurait l'IA, joué tout seul ce n'est pas vraiment interéssant.
Là, je n'ai pas encore regardé le fichier pour voir ce que ça donne.

J'y vais de ce pas.


A bientôt

 

[Lone-wolf]

Re : UserForm et ImageList

Je viens de regarder le fichier, c'est pas mal!

le petit -, c'est le messagebox du gagnant. J'avais prévu d'afficher ça sur des labels, c'est moin génant visuellement.

A+

 

[Habitude]

Re : UserForm et ImageList

Oui effectivement
Ce volet n'est pas terminer

Si par exemple 2 joueurs ont un brelan, ca t'affichera rien.

 

[Lone-wolf]

Re : UserForm et ImageList

Ok, fait ça tranquillement.


A+