TCustomRichView.InsertRVFFromStream

<< Нажмите, чтобы показать Содержание >>

TCustomRichView.InsertRVFFromStream

Вставляет документ RVF из Stream в позицию, заданную Index (первый вставленный элемент будет иметь этот номер).

function InsertRVFFromStream(Stream: TStream; Index: Integer): Boolean;

Это единственный метод TRichView (не TRichViewEdit), вставляющий элементы в любую позицию.

Index – номер элемента. Элементы документа нумеруются от 0 до ItemCount-1. Элементы поддокументов (ячеек таблиц) не включены в диапазон элементов основного документа.

Тип метода: viewerstyle быстрое изменение документа.

Настройки чтения RVF могут быть изменены в редакторе компонента TRichView.

Если используются шаблоны стилей, и RVFTextStylesReadMode=RVFParaStylesReadMode=rvf_sInsertMerge, и StyleTemplateInsertMode<>rvstimIgnoreSourceStyleTemplates, этот метод включает шаблоны стилей из вставляемого RVF в Style.StyleTemplates и читает стили текста и абзацев согласно StyleTemplateInsertMode. Метод вызывает событие OnStyleTemplatesChange.

Возвращаемое значение: «Было ли чтение успешным?»

hmtoggle_arrow1Пример

Как объединить несколько RVF-файлов в один документ.

procedure AddDoc(const FileName: String; rv: TCustomRichView); 

var Stream: TFileStream; 

begin 

  Stream := TFileStream.Create(FileName, fmOpenRead); 

  rv.InsertRVFFromStream(Stream, rv.ItemCount); 

  Stream.Free; 

end; 

  ... 

  RichView1.Clear; 

  RichView1.DeleteUnusedStyles(True, True, True); 

  AddDoc('c:\file1.rvf', RichView1); 

  AddDoc('c:\file2.rvf', RichView1); 

  AddDoc('c:\file3.rvf', RichView1); 

  RichView1.Format; 

Если нужно добавить разрывы страниц между содержимым файлов, используйте код:

procedure AddDoc(const FileName: String; rv: TCustomRichView); 

var Stream: TFileStream; 

  ItemCount: Integer; 

begin 

  ItemCount := rv.ItemCount; 

  Stream := TFileStream.Create(FileName, fmOpenRead); 

  rv.InsertRVFFromStream(Stream, rv.ItemCount); 

  Stream.Free; 

  if (ItemCount>0) and (ItemCount<rv.ItemCount) then 

    rv.PageBreaksBeforeItems[ItemCount] := True; 

end; 

 

См. также свойства:

▪RVFOptions;

▪RVFWarnings;

▪RVFTextStylesReadMode (тип этого метода: вставка RVF);

▪RVFParaStylesReadMode (тип этого метода: вставка RVF).

См. также события:

▪OnRVFImageListNeeded;

▪OnRVFControlNeeded;

▪OnRVFPictureNeeded;

▪OnControlAction (ControlAction=rvcaAfterRVFLoad);

▪OnStyleTemplatesChange.

См. также методы:

▪AppendRVFFromStream;

▪LoadRVFFromStream;

▪LoadRVF;

▪Format;

▪FormatTail.

См. также методы TRichViewEdit:

▪InsertRVFFromStreamEd.

▪См. также:

▪Редактор компонента TRichView;

▪Сохранение и загрузка;

▪Обзор RVF.