Filestream, string anhängen

[eLse-maestro]

Delphi-Quellcode:

if s <> '' then
  fs.Write(PChar(s)^, length(s));

habe ich probiert, sowie die anderen beispiele.. aber ich bekomme immer noch eine fehler meldung beim auslesen..
fs.read    fs.Read(s1,length(s));