在delphi中保存TXT文件后怎么全是代码,而用DOC保存出来的又是我需要的文字?

程序如下:procedure TForm1.Button3Click(Sender: TObject);beginwith SaveDialog1 dobeginFilter:=✀文本文件(*.txt)|*.txt|Word文档(*.doc)|*.doc|所有文件(*.*)|*.*✀;DefaultExt:=✀txt✀;If execute thenRichEdit1.Lines.SaveToFile(FileName);end;end;运行的时候保存为TXT后缀,出现的TXT文档里面的内容全部是代码,而保存为DOC后缀,里面的内容就是我需要的中文段落了。
2026年09月21日 08:37
有3个网友回答
网友(1):

RichEdit,富文本,它本身就不是txt,是包含有格式描述的文本,你所看到的代码,就是描述文本格式用的。你要保存为txt,只能使用memo,一定要用richedit的话,只能保存为 rtf 或doc。rtf是richedit最标准的文件格式。

网友(2):

如果你确认RichEdit中的内容是纯文本,不要任何版式控制信息的话,可以设置属性:
RichEdit.PlaneText := True;

网友(3):

请参考ranjian32回答。