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.