如果往Tmemorystream流中写入汉字？ ( 积分: 30 )

我用下面代码往流中写入汉字，但打开保存后的文件内容是乱码，这是怎么回事？
还请指点！
var
bb:TMemoryStream;
s:string;
begin
s:='中文';
bb:=TMemoryStream.Create;
bb.Write(s,Length(s));
bb.SaveToFile('cc.txt');
bb.Free;
end;

你向流写入并还是S的内容。改成bb.Write(s[1],Length(s));就可以了！

var
bb:TMemoryStream;
s:string;
begin
s:='中文';
bb:=TMemoryStream.Create;
bb.Write(s[1],Length(s));
bb.SaveToFile('cc.txt');
bb.Free;
end;

呵，是我程序中的模式搞错了！
谢谢！