Zitat von
Ultimator:
Es ist zwar besser wenn man es nur einmal aufruft, aber es ist nicht soo Hammer-schlimm, wenn man es öfters macht.
Sicher
Es geht a) auf die Performance und b) mindert es die Qualität der Zufallszahlen.
In älteren Delphi Versionen, auf Linux und auf älteren Windows Versionen kannst Du mit folgendem Konstrukt schnell mal 1000 gleiche Zahlen erreichen.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
I: Integer;
begin
Memo1.Lines.BeginUpdate;
try
for I := 0 to 999 do
begin
Randomize;
Memo1.Lines.Add(IntToStr(Random(MaxInt)));
end;
finally
Memo1.Lines.EndUpdate;
end;
end;
Deswegen, Randomize nur einmal aufrufen.
...
...