FS.Write(s[1], Length(s));
としたらできました。