怎样保存richedit中的字体保存在文件中

Question

我想把richedit中的内容的字体（如颜色大小等）连同内容一同保存在我指定的文件中，比如“111.RTF”。以后读取出来的时候和保存的样子一样。
请问要怎么做？

Answer 1

RichEdit应该本身就有保存格式的功能的吧，楼主看一下RichEdit的帮助呢

Answer 2

//默认既是如此
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
  RichEdit1.Lines.SaveToFile('c:\temp\temp.rtf');
end;procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
  RichEdit1.Lines.LoadFromFile('c:\temp\temp.rtf');
end;

Answer 3

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
  RichEdit1.PlainText := False;
  RichEdit1.Lines.SaveToFile('c:\temp\temp.rtf');
end;procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
  RichEdit1.PlainText := False;
  RichEdit1.Lines.LoadFromFile('c:\temp\temp.rtf');
end;