Discussion :

[gbegreg]

Bonsoir,

Je vous propose dans cet exemple un remake de la démo Amiga "Boing Ball" dont voici une vidéo de la démo d'origine :

Mon remake est réalisé avec Delphi et sans code



Il y a un petit bonus supplémentaire au bout de 10 secondes par rapport à la démo d'origine

Presque sans code car j'ai dû mettre à 0 les propriétés "Marks" des TGrid3D pour que toutes les lignes des grilles soient de la même couleur.

Le projet est disponible ici : AmigaBoingBall.zip

[Paul TOTH]

sympa

tu peux remonter un bug sur Marks, il manque une déclaration "stored" pour stocker la valeur 0

en plus le code ne s'attend manifestement pas à avoir une valeur 0

Code :

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

if (frac(X) = 0) and (frac(X / Marks) = 0)

oups, tu peux aussi changer la couleur en #A08E09C1...vu que le code change la valeur Alpha en $A0...donc si tu lui donnes cette valeur au départ, la couleur ne change pas

[gbegreg]

Oui Paul j'ai modifié la couleur des lignes de la grille pour quelle soit la même que celle des lignes "marquées", comme ça c'est réellement du no-code

J'ai mis le projet sur mon GitHub (https://github.com/gbegreg/AmigaBoingBall) et j'ai fait une petite vidéo Youtube :

[Charly910]

Bravo gbegreg super démo

A+
Charly