IGxFlowDocument.LoadFormattedText

Синтаксис

LoadFormattedText:(Text: String);

Параметры

Text. Строка в формате rtf.

Описание

Метод LoadFormattedText загружает строку в поле форматированного текста.

Пример Fore

Для выполнения примера предполагается наличие:

объекта класса UiReport с идентификатором «UiReport1», настроенного на регламентный отчет;
объекта класса ReportBox с идентификатором «ReportBox1», настроенного на «UiReport1»;
первый объект отчета должен быть форматированным текстом.

Подключите системные сборки: Report, Tab, Drawing, Forms, Metabase, Forms.Net (для примера Fore.NET). Добавьте событие кнопки:

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Rep: IPrxReport;
    Doc: IPrxFlowDocument;
    Text: String;
    Rect: IGxRectF;
    Obj: ITabObject;
    Objs: ITabObjects;
    TS: ITabSheet;
Begin
    Rep := UiReport1.Report;
    // Получим текущий форматированный текст
    TS := (Rep.ActiveSheet As IPrxTable).TabSheet;
    Objs := TS.Objects;
    Doc := Objs.Item(0).Extension As IPrxFlowDocument;
    Text := Doc.SaveFormattedText;
    Rect := New GxRectF.Create(0, 0, 50, 50);
    // Создадим новый форматированный текст
    Obj := Objs.Add("PrxFlowDocument", Rect);
    Doc := Objs.Item(1).Extension As IPrxFlowDocument;
    Doc.LoadFormattedText(Text);
End Sub Button1OnClick;

В результате выполнения примера будет создана копия форматированного текста.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Imports Prognoz.Platform.Forms.Net;
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Tab;
Imports Prognoz.Platform.Interop.Drawing;

Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    Rep: IPrxReport;
    Doc: IPrxFlowDocument;
    Text: String;
    Rect: GxRectF = New GxRectFClass();
    Obj: ITabObject;
    Objs: ITabObjects;
    TS: ITabSheet;
Begin
    Rep := uiReportNet1.ReportUi.Report;
    TS := (Rep.ActiveSheet As IPrxTable).TabSheet;
    Objs := TS.Objects;
    // Получим текущий форматированный текст
    Doc := Objs.Item[0].Extension As IPrxFlowDocument;
    Text := Doc.SaveFormattedText();
    Rect.Create(0, 0, 50, 50);
    // Создадим новый форматированный текст
    Obj := Objs.Add("PrxFlowDocument", Rect);
    Doc := Objs.Item[1].Extension As IPrxFlowDocument;
    Doc.LoadFormattedText(Text);
End Sub;

См. также:

IGxFlowDocument