Thema: Delphi Problem mit Stream.Read

Einzelnen Beitrag anzeigen

moelski

Registriert seit: 31. Jul 2004
1.110 Beiträge
 
Delphi 2010 Professional
 
#1

Problem mit Stream.Read

  Alt 31. Jul 2004, 21:37
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
Dominik Schmidt
Greetz Dominik

I love Delphi 2007/2010
  Mit Zitat antworten Zitat