我的程序如下:
Richedit1.PlainText:=False;
RichEdit.Lines.LoadFromFile('D:\abc.rtf');
……
Richedit1.PlainText:=True;
RichEdit.Lines.SaveToFile('D:\abc.txt')
一些.RTF文件被转存成纯文本文件后,我用记事本打开时,出现以下提示:“这文件不是有效的文本文件,可能是二进制文件。转换并载入?”(这个问题有时出现,有时就不出现,而且就是同一个文件,我非常困惑)。
这导致了转换并载入后原来RTF文件中的隐藏部分丢失,我的程序无法正常运行。请问怎样通过程序控制来判断当前的文本文件是二进制文件,并且将它转换成普通的文本文件?或者RichEdit部件有什么属性或方法来控制这个问题?

解决方案 »

  1.   

    To bryantd (Delphi菜鸟):
        测试了你的代码,一直没有出现你说的问题。请设法捕捉到“何时何种情况容易导致问题发生”,是不是此段代码以外的其他代码导致了问题的发生。
      

  2.   

    加个Memo,把Rich的Text赋给Memo,然后调用Memo的Save!
      

  3.   

    如果直接访问它的Text,效率会很低,速度很慢。所以我先将它转存成文本文件再对文件进行处理。
    加个Memo,把Rich的Text赋给Memo,然后调用Memo的Save!这招能行吗??我试验一下去!