Fonction random

silversword666 Messages postés 10 Date d'inscription jeudi 14 juin 2007 Statut Membre Dernière intervention 13 mai 2009 - 16 juin 2007 à 18:38
Bacterius Messages postés 3792 Date d'inscription samedi 22 décembre 2007 Statut Membre Dernière intervention 3 juin 2016 - 25 mars 2008 à 23:05
Bonjour,

Dans le cadre de mon cours de delphi je dois développer un programme qui en ce qui me concerne, est le jeu du pendu.
Je me trouve confronté à un problème qui est le suivant :

J'ai défini des mots en incluant chaque lettre du mot dans une case d'un tableau de type Tmot par exemple:
mot[1]:='b';
mot[2]:='o';
mot[3]:='n';

mot2[1]:='e';
mot2[2]:='t'; etc...

J'ai ensuite créé un tableau de type Tdico=array[1..10] of Tmot; et dans ce tableau j'ai mis mes mots:
dico[1]:=mot;
dico[2]:=mot2;

Je souhaiterais donc faire en sorte qu'en cliquant sur un bouton, un des mots soit pris au hasard pour être le mot à découvrir et mon problème est que je n'arrive pas à utiliser la fonction random, je cherche quelque chose du type:
MotATrouver:=random(dico[i]);

Merci d'avance de votre aide!
Cordialement,
Franck.

11 réponses

f0xi Messages postés 4205 Date d'inscription samedi 16 octobre 2004 Statut Modérateur Dernière intervention 12 mars 2022 37
16 juin 2007 à 19:21
Mot := Dico[ Random( Length(Dico)  ) ];
0