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

markieren

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

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

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

Forumregeln