Problem mit Stream.Read

[moelski]

Hallo!

Ich schreibe gerade ein kleines Prog (in D6) um ein LogFile auszulesen. In
den Dateien stehen Bytes die ich gerne in ein Array laden möchte. Ich nutze
dafür folgende Funktion:

Delphi-Quellcode:

    Result:  Array of Byte;  // global deklariert

    Stream := TFileStream.Create(Filename, fmOpenRead or fmShareDenyWrite);
    try
      SetLength(Result, Stream.Size);
      Stream.Read(Result[1], Length(Result));
    finally
      Stream.Free;
    end;

Wenn ich nun eine Datei einmal öffne, dann gehts noch, aber wenn ich danach
1-2x eine andere Datei aufrufe, dann bekomme ich folgenden Fehler:

Zugriffsverletzung bei Adresse xxxx in Modul 'LogView.exe'. Schreiben von
Adresse xxx

Kann mir da jemand einen Rat geben, was da nicht passt?

Grüße Dominik