Record in FileStream schreiben

[Die Muhkuh]

Hi,

ich hab hier schon danach gesucht und bin auf einen Beitrag von Luckie gestoßen. Seine Lösung hat auch fast geklappt^^.

Also, erstma bisschen Code:

Delphi-Quellcode:

TTEDInfo = record
    CORE_VERSION: String;
    CONTAINER_VERSION: String;
    DOCUMENT_VERSION: String;
    EDITOR_VERSION: String;
    TED_VERSION: String;
    SAVE_TEXT: String;
  end;

[...]
function TContainer.ReadTedInfoFromStream(F: TStream): TTEDInfo;
begin
  F.ReadBuffer(Result, SizeOf(TTEDInfo));  // <- Da
end;

procedure TContainer.WriteTedInfoToStream(F: TStream; aInfo: TTEDInfo);
begin
  F.WriteBuffer(aInfo, SizeOf(TTEDInfo));
end;

An der markierten Stelle bekomme ich einen Stream-Lesefehler.

Woran könnte der Fehler liegen?