SaveRTFToStream
Назначение
Сохраняет документ в формате RTF в поток.
Описание
function SaveRTFToStream (Stream: TStream; SelectionOnly: Boolean = False): Boolean
Параметр |
Назначение |
Stream |
Поток, в который сохраняется документ в формате RTF. |
SelectionOnly |
Необязательный параметр. Если True, значит экспорт только выделенной части документа. |
Пример
procedure Form1_Button1_OnClick (Sender: TObject; var Cancel: boolean);
var
RTF: TFileStream;
begin
RTF := TFileStream.Create('d:\file.rtf', fmCreate);
try
if Form1.RichEdit1.SaveRTFToStream(RTF) then
ShowMessage('Файл успешно сохранен')
else
ShowMessage('Во время экспорта произошла ошибка.');
finally
RTF.Free;
end;
end;