IPrxReport.DelayedLoad

Синтаксис

DelayedLoad: Boolean;

DelayedLoad: boolean;

Описание

Свойство DelayedLoad определяет возможность отложенной загрузки листов регламентного отчёта.

Комментарии

Доступные значения:

Пример

Для выполнения примера в репозитории предполагается наличие регламентного отчёта с идентификатором REPORT, который содержит два листа.

Добавьте ссылки на системные сборки: Metabase, Report.

Sub UserProc;
Var
    MB: IMetabase;
    Report: IPrxReport;
    Sheet: IPrxSheet;
    Sheets: IPrxSheets;
Begin
    // Получим репозиторий
    MB := MetabaseClass.Active;
    // Получим регламентный отчёт
    Report := MB.ItemById("REPORT").Edit As IPrxReport;
    // Установим отсроченную загрузку листов
    Report.DelayedLoad := True;
    // Получим листы отчёта
    Sheets := Report.Sheets;
    // Получим второй лист отчёта
    Sheet := Sheets.Item(1);
    // Загрузим второй лист отчёта, если он не загружен
        If Not Sheet.IsLoaded Then
            Sheet.Load;
        End If;
    // Сохраним отчёт
    (Report As IMetabaseObject).Save;
End Sub UserProc;

Imports Prognoz.Platform.Interop.Report;
…
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    Report: IPrxReport;
    Sheet: IPrxSheet;
    Sheets: IPrxSheets;
Begin
    // Получим репозиторий
    MB := Params.Metabase;
    // Получим регламентный отчёт
    Report := MB.ItemById["REPORT"].Edit() As IPrxReport;
    // Установим отсроченную загрузку листов
    Report.DelayedLoad := True;
    // Получим листы отчёта
    Sheets := Report.Sheets;
    // Получим второй лист отчёта
    Sheet := Sheets.Item[1];
    // Загрузим второй лист отчёта, если он не загружен
        If Not Sheet.IsLoaded Then
            Sheet.Load();
        End If;
    // Сохраним отчёт
    (Report As IMetabaseObject).Save();
End Sub;

В результате выполнения примера для отчёта будет задана отложенная загрузка листов, при открытии отчёта будет загружен активный и второй лист отчёта.

См. также:

IPrxReport