IPrxTableIsland.Pager

Синтаксис Fore

Pager: IPrxTableIslandPager;

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

Pager: Prognoz.Platform.Interop.Report.IPrxTableIslandPager;

Описание

Свойство Pager возвращает параметры работы реляционной области в режиме постраничного отображения.

Комментарии

Для включения режима используйте свойство IPrxTableIslandPager.Enabled.

Для переключения страниц в режиме постраничного вывода используйте методы IPrxTableIslandPager.Next и IPrxTableIslandPager.Prev.

Пример Fore

Для выполнения примера добавьте ссылки на системные сборки Metabase и Report. Пример является обработчиками события для компонентов формы. На форме расположите компоненты UiReport и ReportBox, 3 кнопки. Выберите в качестве объекта UiReport регламентный отчет с реляционной областью. Установите UiReport в качестве отчета, выводимого в ReportBox. Активируйте UiReport1.

Class TESTForm: Form
    Report: IPrxReport;
    TabIs: IPrxTableIslands;
    TI: IPrxTableIsland;
    Pager: IPrxTableIslandPager;
    
    Sub TESTFormOnCreate(Sender: Object; Args: IEventArgs);
    Begin
        Report := UiReport1.Report;
        TabIs := Report.TableIslands;
        TI := TabIs.Item(0);
        debug.WriteLine("Область: " + TI.Name);
        Pager := TI.Pager;
        Pager.Enabled := True;
        TI.Recalc;
        Pager.DisplayPage := 0;
        Pager.Rows := 10;
        debug.WriteLine("Количество страниц отображения: " + Pager.Pages.ToString);
        TI.Recalc;
    End Sub TESTFormOnCreate;
    
    Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
    Begin
        Pager.Prev;
    End Sub Button1OnClick;
    
    Sub Button2OnClick(Sender: Object; Args: IMouseEventArgs);
    Begin
        Pager.Next;
    End Sub Button2OnClick;
    
    Sub Button3OnClick(Sender: Object; Args: IMouseEventArgs);
    Begin
        Pager.ExpandAll;
    End Sub Button3OnClick;
End Class TESTForm;

После открытия формы на листе будет загружена первая страница отображения, количество страниц будет выведено в окно консоли. Для перехода по страницам используйте кнопки с идентификаторами «Button1» и «Button2». Для выключения режима постраничного отображения без перевычисления реляционной области используйте кнопку с идентификатором «Button3».

Пример Fore.NET

Для выполнения примера добавьте ссылки на системные сборки Metabase и Report. Пример является обработчиками события для компонентов формы. На форме расположите компоненты UiReportnet и ReportBoxnet, 3 кнопки. Выберите в качестве объекта UiReportnet регламентный отчет с реляционной областью. Установите UiReportnet в качестве отчета, выводимого в ReportBoxnet. Активируйте UiReportnet1.

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Report;

Public Partial Class TESTForm: Prognoz.Platform.Forms.Net.ForeNetForm
    Public Constructor TESTForm();
    Begin
        InitializeComponent();
    End Constructor;

    Report: IPrxReport;
    TabIs: IPrxTableIslands;
    TI: IPrxTableIsland;
    Pager: IPrxTableIslandPager;
    
    Private Sub TESTForm_Load(sender: System.Object; e: System.EventArgs);
    Begin
        Report := UiReportnet1.ReportUi.Report;
        TabIs := Report.TableIslands;
        TI := TabIs.Item[0];
        Pager := TI.Pager;
        Pager.Enabled := True;
        TI.Recalc();
        Pager.DisplayPage := 0;
        Pager.Rows := 10;
        System.Diagnostics.Debug.WriteLine("Количество страниц отображения: " + Pager.Pages.ToString());
        TI.Recalc();
    End Sub;

    Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
    Begin
        Pager.Prev(1);
    End Sub;

    Private Sub button2_Click(sender: System.Object; e: System.EventArgs);
    Begin
        Pager.Next(1);
    End Sub;
    
    Private Sub button3_Click(sender: System.Object; e: System.EventArgs);
    Begin
        Pager.ExpandAll();
    End Sub;

End Class;

После открытия формы на листе будет загружена первая страница отображения, количество страниц будет выведено в окно консоли. Для перехода по страницам используйте кнопки с идентификаторами «button1» и «button2». Для выключения режима постраничного отображения без перевычисления реляционной области используйте кнопку с идентификатором «button3».

См. также:

IPrxTableIsland