TFileStream.Write / .Read

[StanY]

Ich habe das Problem, dass ich per TFileStream eine Integervariable hineinschreibe, sie jedoch falsch ausglesen wird.

Write:

Delphi-Quellcode:

  try
    F := TFileStream.Create(FName,fmCreate); //ja, FName ist gesetzt
  finally
    Size := Length(Connection);
    WriteLn(Size); //LIEFERT 1 ZURÜCK
    F.Write(Size,SizeOf(Size));

    F.Free;
  end;

Read:

Delphi-Quellcode:

  try
    F := TFileStream.Create(FName,fmOpenRead); //ja, FName ist gesetzt
  finally
    Size := F.Read(Size,SizeOf(Size));
    WriteLn(IntToStr(Size)); //GIBT 4 AUS
    
    F.Free;
  end;

Was mache ich falsch?

edit: ui, hundertste Beitrag - er, Frage ^^