Problem mit dynamischen Array

[bono_82]

Hallo,

ich will eine Datei per FileStream byteweise auslesen, habe allerdings
folgendes Problem beim Arbeiten mit einem dynamischen Array.

Deklaration: Data_Buffer: array of byte; Verwendung (z.B. die ersten 512 Byte auslesen):

Delphi-Quellcode:

str := VisuFilePath+VisuFileName+'.dat';
VisuFile :=   TFileStream.Create(str,fmShareDenyWrite);
SetLength(Data_Buffer,512);
VisuFile.Position := 0;
VisuFile.Read(Data_Buffer,512);

Ich bekomme so einfach nichts aus dem Stream gelesen. Das ganze funktioniert mit einem statischen Array
allerdings wunderbar. Ich finde einfach keinen Fehler.
Wäre schön wenn mir jemand helfen könnte

Gruß!