Frage zu Out of Memory Error (Ältere Delphi Version)

[TheGroudonx]

Hi,

Ich habe folgenden einfachen Code den ich in Delphi (Windows) ausführe:

var i : Integer; anArray : Array of String;
for i := 0 to 1000000 do
begin

setLength(anArray, length(anArray) + 1);
anArray[length(anArray) - 1] := intToStr(random(100000000));

end;

Ich frage mich nun, wieso das in einem Out of Memory (Zu wenig Arbeitsspeicher) endet.
Würde Ich stattdessen das array nur einmal auf die Größe 1000000 setzen, gäbe es erstmal keinen solchen Fehler (Das ist aber nicht die gesuchte Lösung hier).