Delphi - база знаний

       

Как из RXRichEdit сохранить в RTF формате?


Как из RXRichEdit сохранить в RTF формате?





procedure TForm1.Button1Click(Sender: TObject);
  var t:TFileStream;
begin
  t:=TFileStream.create('c:\myfilename.txt', fmCreate or fmOpenWrite);
  t.Size:=0;
  RxRichEdit1.Lines.SaveToStream(t);
  t.free;
end;

Автор ответа: Vit
Взято с Vingrad.ru





Содержание раздела