保存txt文件出现乱码问题？
我用bcb打开txt文件，保存之后用记事本打开就出现乱码，但在bcb中再打开仍然可以正常显示，这是怎么回事啊?
主要代码如下：

//---------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
RichEdit1 -> Clear();
FileName = "untitled.txt" ;
}
//---------------------------------------
void __fastcall TForm1::FileNewExecute(TObject *Sender)
{
RichEdit1 -> Clear();

FileName = "untitled.txt";
}
//-----------------------------------------
void __fastcall TForm1::FileOpen1Accept(TObject *Sender)
{
RichEdit1 -> Lines -> LoadFromFile(FileOpen1 -> Dialog -> FileName);
FileName = FileOpen1 -> Dialog -> FileName;
}
//-----------------------------------------
//---------------------------------------

void __fastcall TForm1::FileSaveExecute(TObject *Sender)
{
if (FileName == "untitled.txt")

FileSaveAs1->Execute();
else
RichEdit1->Lines->SaveToFile(FileName);
}
//---------------------------------------

void __fastcall TForm1::FileSaveAs1BeforeExecute(TObject *Sender)
{
FileSaveAs1 -> Dialog -> InitialDir = ExtractFilePath(FileName);
}

void __fastcall TForm1::FileSaveAs1Accept(TObject *Sender)
{
FileName = FileSaveAs1 -> Dialog -> FileName;
RichEdit1 -> Lines -> SaveToFile(FileName);
}
//---------------------------------------

[解决办法]
这是将RichEdit中的内容作为富文本导出了。导出以前设置一下纯文本：

C/C++ code

RichEdit1->PlainText = true;RichEdit1->Lines->SaveToFile(FileName);