Discussion :

[tintin62]

bonjour
je sais que j'ai pas le niveau mais je cherche
un exemple en FMX 3D de boules en mouvement (49 pour
être précis) dans une sphère semi-transparente
comme on voit au tirage du loto
j'y arrive avec une mais j'ai du mal avec animation
peut-on dans la même animation mettre plusieurs critères
une fois le X le Y la rotation et ensuite gérer la collision avec
la sphère qui les enveloppe
merci d'avance pour toute aide

[ShaiLeTroll]

Il te faudrait trouver des tutoriels sur
TViewport3D pour intégrer la 3D dans une application 2D (la même que celle avec la grille je suppose)

Ensuite, faut creer les TSphere, chacune avec une texte pour le nombre, genre un TTextureMaterialSource

Et voir si TFloatAnimation peut animer les TSphere

Je commencerais par un mouvement plus simple comme la rotation des planètes dans le système solaire

Regarde ce post de Paul Toth pour maitriser les objets.

Ensuite tu pourras voir comment produire des rebonds (vitesse, angle) entre les boules et avec la paroi (friction, rotation de la boule), c'est la création d'un moteur physique ... un chantier notable.
A mon avis, tu finiras par faire un truc bidon pré-calculé pour donner l'idée d'une animation réelle.


Et fournir ton code serait déjà un commencement.

Rien que le commencer en 2D de faire rebondir des cercles dans un rectangle, puis d'un un cercle ... un exercice courant, pense à l'économiseur écran "Bulles"

Regarde ce tutoriel pour la chute d'un boule :
[TUTO 4/15 ] [TUTO DELPHI] - [TUTORIEL POUR DEBUTANT] [RADSTUDIO - EMBARCADERO] [ANIMATION OBJET 3D]

[gbegreg]

Bonjour,

Je n'ai pas d'exemple correspondant à cette demande. Pour simuler un tirage du loto de manière convaincante, je pense qu'il faudra utiliser un moteur de physique (Gorilla3D en intègre un, Castle Game Engine...).

Pour répondre à la question "peut-on dans la même animation mettre plusieurs critères" oui en partie en modifiant une autre propriété de l'objet dans l'événement OnProgress de l'animation. Cependant, cela implique que le second critère de l'animation aura la même durée.

Pour jouer plus finement (en fonction des besoins) sur les propriétés rotation, taille, translation... d'un objet 3D, il est possible de passer directement par la matrice correspondante. Malheureusement, TControl3D n'expose pas de propriété publique pour appliquer une matrice. Il est possible de passer par un petit helper :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
type
  TControl3DHelper = class helper for TControl3D
  public
    procedure SetMatrix(const M: TMatrix3D);
  end;
 
procedure TControl3DHelper.SetMatrix(const M: TMatrix3D);
begin
  FLocalMatrix := M;
  RecalcAbsolute;       // important : recalcule la matrice absolue (avec les parents)
  RebuildRenderingList; // important : force le viewport à reconstruire sa liste de rendu
  Repaint;
end;

Ainsi, il est possible d'appliquer plusieurs transformations à l'objet 3D en une seule fois :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
  // MonObjet est un TControl3D déjà initialisé
  var MScale := TMatrix3D.CreateScaling(Point3D(5, 5, 5));
  var MRotX  := TMatrix3D.CreateRotationX(DegToRad(20));
  var MRotY  := TMatrix3D.CreateRotationY(DegToRad(45));
  var MRotZ  := TMatrix3D.CreateRotationZ(DegToRad(60));
  var MTrans := TMatrix3D.CreateTranslation(Point3D(1, -2, 5));
 
  var MCombined := MScale * MRotX * MRotY * MRotZ * MTrans;
 
  MonObjet.SetMatrix(MCombined);

L'ordre de la multiplication qui constitue MCombined est important et doit correspondre à l'ordre dans lequel on souhaite appliquer les transformations.

[tintin62]

bonjour
je vois ou plutôt je pensais que ça serait un peu moins complexe
je vais regarder les tutos je reviendrai par la suite
merci encore

[tintin62]

Bonsoir
trop compliquer en 3D
donc viens de faire un exemple en 2D
sa permet de chercher 7 boules sur 49
pour jouer au loto
vous joint fichier
je bute dans animation pour pouvoir aléatoirement
changer la vitesse de la boule
toute idée est la bien venue
merci
tcercle.zip

[SergioMaster]

Je ne sais plus si j'avais mis de l'animation dans cette source Jeux-de-Loto l'objectif étant, avant tout, la méthode de tirage.

[tintin62]

Bonjour
viens aller voir tes sources sa ma appris sur la couleur
gradient sa m'évite de charger un bitmap en mémoire
merci