Discussion :

[DebutantPascal]

Bonjour, j'ai récemment commencé la programmation et le langage pascal (d'où ma question qui peut sembler très débile).
J'aimerai donner un nom aléatoire parmi une liste définie à des personnages que je crée, et j'y suis parvenu avec un code de ce genre là :

Code :

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

1
2
3
4
5
6
 
alea:= random(100);
Nom := Martin; //le premier nom de mon type Noms
for i := 1 to alea do
  Nom:= succ(Nom);
Perso.Nom:= Nom;

Mais j'aimerai savoir si il n'est pas possible, via un array, d'accéder directement au n-ème nom sans avoir à passer par ce genre de boucle. Mes tests ont aboutis à des échecs et je ne vois vraiment pas comment faire.
Auriez-vous une solution, ou peut-être une méthode totalement différente de celle à laquelle je pensais, mais toujours sûrement bien meilleure que celle faite ici ?

Merci d'avance pour vos réponses.

[DebutantPascal]

Problème résolu finalement, cela semble simplement venir d'unités nécessaires que je ne mettais pas dans le uses.

[Roland Chastain]

Bonjour !

Vous pourriez faire comme ceci :

Code :

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

Perso.Nom := TNom(alea);