RichEdit中的文本text怎么存成txt文件，以便用计事本打开？,使用TStrings 的savetofile有点问题。

Question

我想把RichEdit中的文本存成计事本文件，怎么存？
RichEdit.lines.add('123');
RichEdit.lines.add('456');
RichEdit.lines.add('你好');
RichEdit.lines.savetofile('c:\rich.txt');
但打开rich.txt内容如下：
{\rtf1\ansi\ansicpg936\deff0\deflang1033\deflangfe2052{\fonttbl{\f0\fnil\fcharset134 MS Sans Serif;}}
\viewkind4\uc1\pard\lang2052\f0\fs16 RichEdit1
\par 123
\par 456
\par \'c4\'e3\'ba\'c3如上，汉字变成了内码，怎么办？
一行行读出来，然后创建TextFile,再写入，太麻烦了，直接用RichEdit可以吗？

Answer 1

var
    strs:TStringList;
begin
    strs:=TStringList.Create;
    RichEdit.lines.add('123'); 
    RichEdit.lines.add('456'); 
    RichEdit.lines.add('你好');     
    strs.Assign(RichEdit.Lines);
    strs.SaveToFile('c:\rich.txt');
    strs.Free;
end;

Answer 2

orRichEdit1.PlainText  := True;