Discussion :

[bastou04]

Bonjour à tous,

j'essaie de programmer un petit jeu sur Visual Studio 2010. C'est un jeu de plateau un peu comme un jeu de dames. Il y a 63 cases (PictureBox) et 8 pions numérotés de 1 à 8.

J'ai mis 8 checkbox qui correspondent à mes 8 pions et 4 boutons (haut, bas, gauche, droite)
Est-il possible de selectionner une image (un pion) dans une PictureBox à l'aide d'une CheckBox et de la déplacée d'1 case à l'aide d'un bouton (haut, bas ,gauche, droite)

Par exemple, je voudrais choisir le pion 6 qui se trouve dans la PictureBox x et voudrais la déplacer dans la PictureBox x+1

Je galère là dessus depuis 15 jours, impossible de trouver une solution. Je m'en remet à vous.

Merci d'avance pour vos réponses

[Pol63]

question trop vague, il y a des tas de possibilités et on ne connait pas ton code actuel
de plus on ne peut pas prendre le temps de coder pour toi

en plus un checkbox et un bouton pour déplacer un truc au lieu d'un drag drop ca reste compliqué

[bastou04]

Désolé, je vais essayer d'être plus clair. Est il possible de définir dans quelle PictureBox se trouve une image a l'aide d'une CheckBox?
j'ai nommé mes 63 picturebox "Pctb" suivi de numéro allant de 11 à 79, (11 étant la premiere case: ligne 1 colonne 1 et 79 la derniere case: ligne 7 colonne 9) et mes 8 pions sont nommés "J1F" suivi de numéro allant de 1 à 8.
J'ai essayé le code suivant

CheckBox6_click
For i = 11 to 79
if Pctb & i = xoudouqi.my.resource.J1F6 Then
Pctb & i .select
End if
Next

je sais ce code est tout pourri mais je ne sais absolument pas comment faire.
PS j'ai déjà programmé ce jeu en VBA d'Excel sur une feuille de calcul et il fonctionne tres bien, mais je n'ai pas utilisé de PictureBox

[Pol63]

tu es parti sur une mauvaise piste par méconnaissance du langage
utiliser les noms des controles pour les manipuler c'est très années 90
avec de la POO tu peux faire la même chose avec 10 ou 20 fois moins de code ...

le tablelayoutpanel en windows forms permet d'adresser un controle par ses coordonnées par exemple, c'est plus simple
un usercontrol pourrait aussi contenir des coordonnées en propriété
les collections c'est bien pratique aussi

sinon ce qu'il te manque c'est peut etre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
dim pctbox = directcast(parent.controls(nom_du_control),picturebox)
pctbox.image =

parent peut etre me si les controles sur le form (ca peut etre un container genre un panel)
nom_du_control est un string, qui peut être composé d'une racine et d'un nombre concaténés

[bastou04]

salut merci pour ta réponse, mais y a un truc que je n'ai pas du bien faire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Private Sub rat1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rat1.CheckedChanged
        Dim i As Integer
        Dim pctbox = DirectCast(Parent.Controls("Pctb" & i), PictureBox)
        For i = 11 To 79
            If pctbox.Image = XOU_DOU_QI.My.Resources.J1F1 Then
                pctbox.Select()
            End If 
        Next i
    End Sub

la ligne 5 est soulignée et en commentaire il y a: l'opérateur '=' n'est pas défini pour les types 'system.drawing.image' et 'system.drawing.bitmap'

pour ce qui est de tablayoutpanel et usercontrol je ne connais pas, mais si je galère trop j’essaierais de me pencher sur la question

[Pol63]

là t'es en train d'écrire n'importe quoi
i vaut 0 et tu l'utilises directement sans lui donner de valeur

après pour les types par référence c'est is au lieu de =

donc au lieu d'écrire du code improvisé, va lire un cours sur vb.net, sinon tu n'arriveras à rien