Bytes aneinanderhängen?

[Z4ppy]

Ich benötige für ein Programm ein MB 0-Bytes. Nun möchte ich das allerdings nicht von vornherein in die Source einbauen, sonst ist die EXE ja auch schon über ein MB gross
Ich will dieses eine MB also zur Laufzeit erzeugen. Danach möchte ich dieses MB in einen FileStream speichern. Ich habs nun so probiert:

Delphi-Quellcode:

//t ist ein Array of Byte
SetLength(t,1048576);
for i:=0 to 1048575 do t[i]:=$0;

Danach schreib ich das so in den FileStream:
F.Write(t,1048576); Es wird aber nichts geschrieben - warum?

(Wahrscheinlich ist es mal wieder ein ganz triviales Problem, aber ich komm einfach nicht auf die Lösung )

MfG Z4ppy