Bonjour je debute en delphi au college et je n'arrive pas a resoudre un probleme concernant un tableau.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
var
 Nombre : Array [1..6] of integer ;
le tableau doit lire 6 entier maximum mais doit arreter de lire meme s'il na pas 6 valeur si l'utilisateur entre 0 comme valeur

J'ai essayer les possibilite suivante sans succes:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
for I := 1 to 6 do
 Lire_tab (Nombre[I]) ; // (lire_tab etant une procedure de validation d'enter)
 if Nombre[I] = 0
  then
   i := 6 ;
jai aussi essayer avec un case sans succes

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
case nombre[I] of
 0 : i := 6 ;
bon voila si quelqu'un aurait une sugestion elle serait grandement apprecier
merci