Stack Overflow trotz iterativen Algorithmus

[stoxx]

Hallo zusammen,

also es war nach meiner Änderung im Quelltext doch nicht behoben.
Es lag letztendlich daran, dass ich die search Methode einfach so deklariert habe.
Jetzt habe ich sie als Methode vom Object declariert, und der Stackoverflow kommt nicht mehr.
Jetzt kommt aber eine neue Exceptionn, dass ich zu wenig Arbeitsspeicher hätte.
Das ist aber Quark !

Denn wenn ich folgende Funktion starte, wird meine Exe 399 MB groß !!
ohne Probleme.
Aber bei meiner Berechnung nur 52 MB .. trotzdem kommt diese dämliche Fehlermeldung ?
Weiss nicht mehr weiter ...

Delphi-Quellcode:

procedure TForm5.Button58Click(Sender: TObject);
var ar : array of integer;
   i : longint;
begin

i := 100000000;
setlength(ar,i);

for i := 0 to length(ar) -1 do ar[i] := 5;
showmessage('warte');
end;