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

TRVEndnoteItemInfo – это класс, представляющий концевую сноску в документе ТРВ-Редактора. Это не компонент. Объекты этого класса создаются в коде и добавляются в компонент TRichView (см. AddItem) или вставляются в компонент TRichViewEdit (см. InsertItem). Тип (стиль) этого типа элемента: rvsEndnote (-204).

Модуль [VCL/FMX] RVNote / fmxRVNote.

Синтаксис

TRVEndnoteItemInfo = class(TRVFootOrEndnoteItemInfo)

Иерархия

TObject

TPersistent

TCustomRVItemInfo

TRVNonTextItemInfo

TRVRectItemInfo

TRVLabelItemInfo

TRVSeqItemInfo

TCustomRVNoteItemInfo

TRVFootOrEndnoteItemInfo

Использование

Тип нумерации концевых сносок задаётся свойством EndnoteNumbering компонента TRVStyle (свойство NumberType, унаследованное от TRVSeqItemInfo, игнорируется).

Перебрать все концевые сноски в документе можно с помощью функций RVGetFirstEndnote и RVGetNextEndnote.

Для присваивания свойства TextStyleNo в вызове конструктора используйте функцию RVGetNoteTextStyleNo.

Ограничение: в TRVReportHelper все страницы, содержащие только тексты концевых сносок, имеют ту же высоту, что и последняя страница документа.

Чтобы изменять свойства этого элемента операциями редактирования, используйте SetCurrentItemExtraIntPropertyEx и SetCurrentItemExtraStrPropertyEx.

Пример

В этом примере в rveMain (TCustomRichViewEdit) вставляется новая концевая сноска. Значение TextStyleNo для неё возвращается функцией RVGetNoteTextStyleNo на основе текущего стиля текста (с номером rveMain.CurTextStyleNo).

Документ (Document) этой концевой сноски содержит одну ссылку на неё (её TextStyleNo возвращается функцией RVGetNoteTextStyleNo на основе стиля с номером 0) и один символ пробела со стилем 0.

var

  EndNote: TRVEndnoteItemInfo;

  NoteRef: TRVNoteReferenceItemInfo;

begin

  EndNote := TRVEndnoteItemInfo.CreateEx(rveMain.RVData,

    RVGetNoteTextStyleNo(rvs, rveMain.CurTextStyleNo), 1, False);

  NoteRef := TRVNoteReferenceItemInfo.CreateEx(EndNote.Document,

    RVGetNoteTextStyleNo(rveMain.Style,0));

  EndNote.Document.AddItem('', NoteRef);

  EndNote.Document.AddNL(' ', 0, -1);

  if rveMain.InsertItem('', EndNote) then

    ...

end;

Раздел справки по классу TRVNoteReferenceItemInfo содержит пример, показывающий, как редактировать Document.

См. также...

Демонстрационные примеры:

▪Demos\*\Editors\Notes