Discussion :

[forzaxelah]

je souhaiterais créer un nombre à 8 chiffres de maniere aléatoire!

du genre :

Code :

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

X := random(....)

Comment on peut faire?

[sofiane44]

Randomize;
x:=random(99999999);

[Harry]

Regarde dans l'aide : tu as une fonction

RandomRange(const AFrom, ATo: Integer): Integer;

[sofiane44]

plutot:
random(100000000);
les nombres de "00000000" a "99999999"

[anapurna]

salut

Code :

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

1
2
3
4
5
Randomize;
while x < 10000000 do
begin
  x := random(99999999);
end;

@+ Phil

[Bruno@Chrysis]

Un truc du genre

Code :

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

1
2
3
4
 
Min := 10000000;
Max := 99999999;
NombreAhuitChiffres := Min+Trunc((Max-Min+1)*Random);

[TicTacToe]

J'allais le dire pour 100 000 000
mais je connaissais pas la fonction RandomRange qui à l'air plus appropriée s'il faut absolument un nombre à partir de 10 000 000

Sinon x := 10 000 000 + Random( 100 000 000 - 10 000 000 );

heu, me plante pas ? vérifier les bornes.

[Alyx²]

randomize ;
X := random(100000000) ;

Ca va renvoyer un chiffre entre 0 et 99999999.
Si tu veux absolument 8 chiffres, tu dois pouvoir completer avec des 0 grace à un formatage.

Sinon, pour avoir un chiffre au dessus entre 10000000 et 99999999, tu peux faire ca:

Code :

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

X := trunc(random*100000000)

nb: random sans parametres renvoie un chiffre entre [0,1[

[LadyWasky]

Merci de cliquer sur !