Random liefert unter WinCE keine Zufallszahlen

[himitsu]

Zitat von Dejan Vu:

[Also ich kenne das so, das man mit RandSeed eine vorhersagbare *Sequenz* erzeugen kann.

Praktisch ja, aber offiziell nein. siehe OH.
Ja, der Algorithmus, für die Berechnung der Zufallszahlen, hat sich seit Langem nicht mehr verändert, aber was nicht ist, könnte dennoch irgendwann mal passieren.

Zitat:

Und wenn Du das mit einem RandSeed hinbekommst, wäre das ein ziemlich dämlicher PRNG.

Delphi-Quellcode:

while True do begin
  RandSeed := 123456;
  ShowMessage(FloatToStr(Random));  
end;

[Dejan Vu]

Zitat von himitsu:

...

Witzbold.

[himitsu]

Zum Glück bin ich nicht fies.

Sonst würde ich sowas machen:

Delphi-Quellcode:

i := 123456;
while i = 123456 do begin
  RandSeed := i;
  i := Random(2954567);
  //ShowMessage(IntToStr(i));
end;
ShowMessage(IntToStr(i));