|
Registriert seit: 22. Mär 2005
Ort: Dingolfing
4.129 Beiträge
Turbo Delphi für Win32
|
Re: Random() zu langsam?
4. Okt 2007, 20:32
Delphi-Quellcode:
procedure TFach.generate;
var i : Integer;
begin
SetLength(Items, Number+1);
for i := 0 to Number do
begin
Items[i] := Random(Number)+1;
end;
end;
Hab mich wohl versehen, das auf den ersten Blick so ausgesehen, als würde er generate sehr oft aufrufen und dabei jedesmal neuen Speicher reservieren. Ich sollte wohl genauer hinschauen.
Manuel Eberl
„The trouble with having an open mind, of course, is that people will insist on coming along and trying to put things in it.“
- Terry Pratchett
|