IPrxTextFields.RemoveByIndex

Синтаксис Fore

RemoveByIndex(Index: Integer; [KeepText: Boolean = False]);

Синтаксис Fore.NET

RemoveByIndex(Index: integer; KeepText: boolean);

Параметры

Index. Индекс текстового поля, которое необходимо удалить.

KeepText. Признак, указывающий на необходимость сохранить текст удаляемого текстового поля. Значение по умолчанию - False.

Описание

Метод RemoveByIndex позволяет удалять текстовое поле регламентного отчёта по заданному индексу.

Пример Fore

Для выполнения примера понадобится форма с размещёнными на ней компонентами UiReport, ReportBox и Button с идентификаторами «UiReport1», «ReportBox1» и «Button1». К компоненту UiReport подключен регламентный отчёт.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Report: IPrxReport;
    Doc: IPrxDocument;
    TFs: IPrxTextFields;
    i: Integer;
Begin
    Report := UiReport1.Instance As IPrxReport;
    Doc := Report.Sheets.FindByName("Документ1") As IPrxDocument;
    TFs := Doc.TextFields;
    Report.Recalc;
    For i := Tfs.Count - 1 To 0 Step - 1 Do
        TFs.RemoveByIndex(i, True);
    End For;
End Sub Button1OnClick;

После выполнения примера найденные по указанному индексу текстовые поля будут удалены.

Пример Fore.NET

Для выполнения примера понадобится форма с размещёнными на ней компонентами UiReportNet, ReportBoxNet и Button с идентификаторами «UiReportNet1», «ReportBoxNet1» и «Button1». К компоненту UiReportNet подключен регламентный отчёт.

Imports Prognoz.Platform.Interop.Report;
…
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    Report: IPrxReport;
    Doc: IPrxDocument;
    TFs: IPrxTextFields;
    Tf: IPrxTextField;
    i: Integer;
Begin
    Report := UiReportNet1.Object.Edit() As IPrxReport;
    Doc := Report.Sheets.FindByName("Документ1") As IPrxDocument;
    TFs := Doc.TextFields;
    Report.Recalc();
    For i := Tfs.Count - 1 To 0 Step - 1 Do
        TFs.RemoveByIndex(i, True);
    End For;
End Sub;

После выполнения примера найденные по указанному индексу текстовые поля будут удалены.

См. также:

IPrxTextFields