Collection de PictureBox, gestion de collision

Bonjour ;)

Un problème se pose sur mon projet de jeu en VB.NET. Mon jeu est un Block Breaker, que je dois présenter pour mercredi à mes oraux de BTS IG.

Je dispose d'un formulaire avec plusieurs PictureBox, dont notamment des blocks pouvant être supprimer lorsque qu'une boule leur rentre dedans.

Je dispose d'un code qui fonctionne pour gérer cette collision :

Code:

---

1 2 3 4 5 6 7

'Collision case If Me.gameBall.Bounds.IntersectsWith(PictureBox3.Bounds) Then Me.GBPlayer.setLocation("y", -Me.GBPlayer.getLocation("y")) Me.GBPlayer.setLocation("x", -Me.GBPlayer.getLocation("x")) PictureBox3.Enabled = False PictureBox3.Visible = False End If

---

Et je dispose d'une classe Block :

Code:

---

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

Imports System   Public Class block   Public myBlock As New PictureBox Private width As Integer = 20 'Largeur du bloc Private height As Integer = 20 'Hauteur du bloc Private backColor As Char   'Constructeur d'instance Public Sub New(ByVal varWidth As Integer, ByVal varHeight As Integer, ByVal myBackColor As Char)   width = varWidth height = varHeight backColor = myBackColor   End Sub   Public Sub setBackColor(ByVal color As System.Drawing.Color)   myBlock.BackColor = color   End Sub   End Class

---

La PictureBox3 est supprimée lorsque la balle lui rentre dedans, mis à part qu'elle ne disparaît pas totalement (mais je règlerais ce problème plus tard).
Cependant, je vais pas répéter ce code plusieurs fois, je dois faire une boucle qui parcours une collection de Block.

J'ai pas mal de difficultés à concevoir une collection de PictureBox et de pouvoir intégrer un parcours total de cette collection.

Pouvez-vous me guider ?
Je vous en remercie :)

Citation:

---

Envoyé par Ysu89

Dans l'urgence, (...) je dois présenter pour mercredi à mes oraux de BTS IG.

---

Déjà sa commence mal :mouarf:

Après je voulais te demander, combien exactement a tu de pictureBox ?
comment les a tu crées?
(j'aimerais vraiment avoir un screen de ton écran pour me donner un idée)

Merci pour la réponse :)

Oui j'ai un peu de retard mais j'ai quasi terminé :p

Bref, j'ai 19 PictureBox que j'ai crée manuellement via l'interface. Je t'ai mis un screen en pièce jointe.

J'ai fais quelques recherches et j'ai réussi à mettre en place ce code :

Code:

---

1 2 3 4

Public Class block   Public myBlock As New PictureBox Private myBlocks As New Collection()

---

Code:

---

1 2 3 4 5 6 7 8 9

Public Function myCollection()   For i = 1 To 19 myBlocks.Add(myBlock) Next   Return (myBlocks)   End Function

---

Je bloque sur l'utilisation de la variable myBlock... je devrais p-ê générer les PictureBox automatiquement lors de l'ouverture de l'appli.

Enfin si tu pouvais me guider sur le sujet, je serais soulagé :)

je te conseil effectivement de créer tes pictureBox via le code :mrgreen:

j'ais fait un programme et j'ais eu a résoudre un problème un peut similaire
*enfin quoique, un peut plus complexe *
mais pour toi sa va etre facile, je te rassure;)

je suis parti sur le principe suivant

1° Créer les briques par code

Code:

---

1 2	'Pour toi sa serra 19 briques Dim pictBriques (18) As PictureBox

---

2° Ajouter les briques *exemple pour une*

Code:

---

1 2 3 4

'Définition de l'emplacement d'ajout de la briques pictBriques(0).Location = New System.Drawing.Point(PosX, PosY) 'Ajout de la brique sur le formulaire Me.Controls.Add(pictBriques(0))

---

3° Contrôler la superposition
La je suis pas trés sur de savoir ce que tu veut ...
*tu ajoute les boites alors je vois pas pk tu a besoin de surveiller si elles se superposent ...*
je préférerais que tu m'aiguille dans ce que tu a vraiment besoin,
parceque ma fonction fait 25 pages donc dit moi ce que tu veut plutôt ;)

Citation:

---

Envoyé par hunteshiva

je te conseil effectivement de créer tes pictureBox via le code

---

Il n'y a aucune difference entre la creation par design ou par code ...

l'utilisation des tableaux p-e .... et en avant les index ;)
(Boucle For, etc.)

Bien merci hunteshiva c'est ce dont j'avais besoin pour générer mes cases ! :)

En fait le but de mon jeu, c'est de casser des briques avec une balle qui rebondit sur un palet que je dois déplacer.

Je gère le système de collision qui supprime une brique lorsque la balle lui rentre dedans.
Il me fallait créer une collection de briques pour pouvoir faire une boucle sur le code de la collision, et ainsi pouvoir rendre destructible la totalité de mes briques.

Cependant j'avais quelques difficultés à insérer des objets dans cette collection mais je pense que le fait de créer les briques par le code me facilitera l'insertion.

Lorsque je souhaiter insérer une picturebox dans ma collection une erreur s'affichait :

Citation:

---

Erreur 1 'PictureBox' est un type et ne peut pas être utilisé en tant qu'expression. C:\Users\Nico\Desktop\blockBreaker\blockBreaker\block.vb 29 26 blockBreaker

---

Voilà je vais voir si la génération des briques par le code fonctionne :D

Oublie ton histoire de classes ...
*j'y comprend rien en + XD*

je t'ais donné tout ce qu'il fallait pour ajouter tes briques *sans classes ou je sais quoi* :mouarf:

aprés, donc je reprend avec ce que tu m'a dit ;)

3° Contrôler la superposition
:!: ne pas attaquer cette partie si le reste n'est pas fini et prévoir les cachets d'aspirine, mal de tête garantie ^^ :!:

tu va faire un calcul très simple:
-> tu va vérifier que la surface de ta Balle ne soit pas sur la surface de ta brique

pour ça, *je te ferrais bien un dessin mais j'ais pas de scanner a ou je suis et la flemme de le faire sur un logiciel quelconque *
tu va parti des coordonnées de ta brique:

Code:

---

1 2	Dim locationBrique As New System.Drawing.Point locationBrique = pictBrique(0).Location

---

http://img25.imageshack.us/img25/8872/sanstitre4yoo.png
tu te retrouve avec deux valeurs:

Code:

---

1 2 3

Dim CoordX, CoordY As Integer CoordX = locationBoite.X CoordY = locationBoite.Y

---

aprés le caclul est simple, tu doit tester sa :

Code:

---

1 2 3

If (X1 >= X2) And (X1 <= (X2 + LargeurBrique)) And (Y1 >= Y2) And (Y1 <= (Y2 + LongueurBrique)) Then 'Destruction de la brique touchée End If

---

*sachant que (X1,Y1) sont les coordonnées de la Balle,
et (X2,Y2) sont les coordonnées de la Brique*

la tu a normalement tous les outils pour faire ta gestion de colision ;)
aprés a toi de voir comment tu fait la suite ... Boucles For *etc*


a voir si tu efface définitivement les boites a chaque fois qu'elles sont touchées *ce qui t'évitera des tests je pense*

Code:

---

Me.Controls.Remove (pictBriques(0))

---

ou si tu les caches simplement *mais la tu risque d'avoir des test de ".Visible" a faire*

Code:

---

(pictBriques(0)).Visible = False

---

voila,
j'spére que sa t'avance un peut ^^

J'ai remercié hunteshiva par MP et je place ce sujet en résolu, mon jeu fonctionne avec une méthode pas très stable mais suffisante !

Si quelqu'un nécessite mon code pour la gestion des collisions ou la création d'une collection de PictureBox n'hésitez pas à demander je le posterai :)

Juste par curiosité, serait-il possible d'essayer ton jeu :-) ?

C'est possible seulement le jeu est à un stade prototype, il est inachevé et ne le sera pas retravaillé pour l'instant :p
C'était une activité que je devais présenter durant mes oraux, je te ferais un .exe si tu veux !

C'était juste pour voir le rendu, ce n'était pas vraiment pour jouer.

Et oui je suis chaud pour ton .exe :)

Ok, voilà l'exécutable :)