？？？？？？？急！如何将richedit中的数据存为rtf文件？？？？？？？

Question

如题.

Answer 1

//保存为rtf文件
procedure TForm1.Button1Click(Sender: TObject);
begin
  RichEdit1.Lines.SaveToFile('d:\aa.rtf');
end;
//导入rtf文件
procedure TForm1.Button2Click(Sender: TObject);
begin
  RichEdit1.Lines.LoadFromFile('d:\aa.rtf');
end;

Answer 2

嗯哼，没错，Lines.SaveToFile(...);
一楼被抢了，好快

Answer 3

richedit的plaintext要设置为false才是rtf格式的文件