RandomSeed(i)

[SPH]

Juste un test qui n'a jamais (je crois) ete fait. Pour savoir si tout le monde a les memes tables :

Code : Tout sélectionner

; Test de quelques milliers de tables randomseek
; ca prend 10 secondes
b.b=0
For i=1 To 1000000 Step 7
RandomSeed(i)
  For u=1 To 255
    b+Random(u)
  Next
Next

Debug b 
; Si le debug fait autre chose que -99, signalez le, merci

[MLD]

Salut SPH
oK -99 ça baigne
Michel

[Warkering]

That's okay, same number!

[Ar-S]

-99 aussi

[Fred]

C'est fait pour ca RandomSeed(), si tout le monde a la meme seed, les chiffres generés seront identiques.

[SPH]

C'est fait pour ca RandomSeed(), si tout le monde a la meme seed, les chiffres generés seront identiques.

Je sais que c'est fait pour ca. Mais je lance le test pour savoir si il y aurait un bug sur une machine

[gildev]

Je confirme le -99 en version 4.41 sur Windows 7 home premium.

[dayvid]

moi tous ce donc je comfirme c'est que ce nombre est négatif