JEU DE TAQUIN

cs_cantador Messages postés 4720 Date d'inscription dimanche 26 février 2006 Statut Modérateur Dernière intervention 31 juillet 2021 - 3 sept. 2009 à 15:05
 Utilisateur anonyme - 3 sept. 2009 à 15:31
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/50514-jeu-de-taquin

Utilisateur anonyme
3 sept. 2009 à 15:31
Au niveau du code tu déclares 19 TImages et 19 TPanels, cela est significatif d'un projet mal pensé.

De plus il aurait été mieux de les déclarer ainsi ImagesList:Array[0..19] Of TImage. Rien que cela te permet de supprimer 18 lignes relatives à ImageI:Timage au niveau de ta class TForm. Dans un autre temps, cela t'aurait permis de faire un code plus propre, plus rapide et moins rébarbatif, en remplacant

image2.Picture := image1.Picture;
image3.Picture := image1.Picture;
.....
image19.Picture := image1.Picture;

Par ImagesList[Index].Picture:=ImagesList[1].Picture;

De nouveau 18 lignes de code remplacées après une seule.

Pareil pour la procédure OnClick du Label1. Ce que tu as fais en une centaine de ligne, aurait pu être fait en 2.

Avec le nombre de fois, ou ce genre de remarque a été faite sur le forum en guise de réponse par notre ami f0xi, ce genre de boulette monstrueuse, ne devrait meme plus avoir lieu. D'ou l'intéret de lire régulièrement le forum ;).
cs_cantador Messages postés 4720 Date d'inscription dimanche 26 février 2006 Statut Modérateur Dernière intervention 31 juillet 2021 13
3 sept. 2009 à 15:05
bonjour,

p'tit coup d'oeil rapide...
des fichiers inutiles dans le zip et
beaucoup de composants non renommés.
+ une capture d'écran qui manque à l'appel...
je n'ai pas encore testé mais le code mérite de l'optimisation.
quant à l'intérêt du jeu, il me semble que le sujet a déjà été traité..
A moins que tu ai introduit de l'intelligence artificielle ?

cantador
Rejoignez-nous