strings per filestream in datei speichern/laden

[Pseudemys Nelsoni]

hallo mütze,

ich hab das beim spoeichern nun so:

Delphi-Quellcode:

procedure TServerBanList.Save(const FileName: string);
var
  FS: TFileStream;
  ServerBan: PServerBan;
begin
  FS := TFileStream.Create(FileName, fmCreate   or fmShareExclusive);
  try
    ServerBan := FServerFirstBan;
    while ServerBan <> nil do
    begin
      FS.Write(ServerBan^.IP[1], Length(ServerBan^.IP));
      ServerBan := ServerBan^.Next;
    end;
  finally
    FS.Free;
  end;
end;

nun bekomm ich aber immernoch nichts angezeigt wenn ich es wieder lade

Zitat:

Dann noch eine Frage: warum speicherst du das als String? Warum nicht einfach 4x 1 Byte? Vor allem hast du bei 4x1 Byte nicht das Problem zu überlegen ob es nun weniger als 16 Byte sind oder nicht - vor allem - wie kommst du auf 16 Byte?

wenn ich es nicht als string speicher sondern in 4 byte aufteile, muss ich das ganze ja noch parsen, macht das das ganze nicht langsamer?
ich meine 16 byte, weil die ip selbst bis zu 15byte sein kann (z.b 255.255.255.255 = 15 zeichen) +1 byte für die laengenangabe des strings