Bei deinem Beispiel geht das aber nicht gut. Da die Schleife viel zu schnell durchläuft, setzt Randomize immer wieder RandSeed auf den aktuellen Timer-Wert. Somit wird (dem Algo sei dank ^^) immer wieder die gleiche Zufallszahl generiert. Oder hat sich da seit D7 was geändert?
Bernhard
^^
Guck dir doch noch mal bitte genau an was er geschrieben hat:
Wenn man keine Loops in der Art
Delphi-Quellcode:
For i := x to y do
begin
Randomize;
x := Random(z);
Use(x)
end
kann man
IMHO Randomize so oft aufrufen wie man will.