tfilestream.read(dynamischer array,x)=> fehler ???

[dadu]

Hi Leute!

Ich möchte eine Datei in einen array of byte laden:

Wenn der Array statisch ist funktioniert das auch,

Delphi-Quellcode:

var 
    bytes: array[1..1000] of byte;
    Datei: TFileStream;
begin
  datei := TFileStream.Create('c:\clip.wav', fmopenread);
  caption := inttostr(Datei.Read(bytes, 1000)); // gibt 1000 zurück
end;

sobald er aber dynamisch definiert ist (und das brauche ich ) bleiben alle Bytes im array 0

Delphi-Quellcode:

var 
    bytes: array of byte;
    Datei: TFileStream;
begin
  setlength(bytes, 1000);
  datei := TFileStream.Create('c:\clip.wav', fmopenread);
  caption := inttostr(Datei.Read(bytes, 1000)); // gibt 1000 zurück
end;

Irgendwelche Lösungsvorschläge???

DaDu