Chaos

[jbg]

Zitat von braingrenade:

Wegen dem randomize(); , das gibt nen ganz interesanten Effekt !

Natürlich. Randomize benutzt die Uhrzeit als Startwert für den Zufallsgenerator. Wenn du nun folgendes machst:

Delphi-Quellcode:

repeat
  Randomize;
  Memo1.Lines.Add(IntToStr(Random(1000));
until Memo1.Lines.Count >= 10;

Dann bekommst du 10x dieselbe Zahl, da sich die Uhrzeit nicht verändert hat (zumindest für Randomize nicht ermittelbar).
Man sollte Randomize nur ein mal im Programm aufrufen. Z.B. im OnCreate Ereignis des Formulars.