IPrxSheetHeaders.FirstPageHeader

Синтаксис

FirstPageHeader: IPrxSheetHeader;

FirstPageHeader: Prognoz.Platform.Interop.Report.IPrxSheetHeader;

Описание

Свойство FirstPageHeader возвращает параметры верхнего колонтитула первой страницы.

Комментарии

Для получения параметров нижнего колонтитула первой страницы используйте свойство IPrxSheetHeaders.FirstPageFooter.

Пример

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

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

Sub UserProc;
Var
    Metabase: IMetabase;
    Report : IPrxReport;
    Sheet: IPrxSheet;
    Headers: IPrxSheetHeaders;
    Param: IPrxSheetHeader;
Begin
    Metabase := MetabaseClass.Active;
    Report := Metabase.ItemById("REPORT").Edit As IPrxReport;
    Sheet := Report.Sheets.Item(0);
    Headers := Sheet.HeadersFooters;
    // Настроим отступ колонтитулов для первой страницы
    Param := Headers.FirstPageHeader;
    Param.Margin := 30;
    Param := Headers.FirstPageFooter;
    Param.Margin := 30;
    // Учтем настройки для первой страницы
    Headers.DifferentFirstPageHeaderFooter := True;
    Debug.Writeline("Отступ верхнего колонтитула первой страницы: " + 
        Headers.FirstPageHeader.Margin.ToString);
    Debug.Writeline("Отступ нижнего колонтитула первой страницы: " + 
        Headers.FirstPageFooter.Margin.ToString);
    (Report As IMetabaseObject).Save;
End Sub UserProc;

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Report;
…
Public Shared Sub Main(Params: StartParams);
Var
    Metabase: IMetabase;
    Report : IPrxReport;
    Sheet: IPrxSheet;
    Headers: IPrxSheetHeaders;
    Param: IPrxSheetHeader;
Begin
    Metabase := Params.Metabase;
    Report := Metabase.ItemById["REPORT"].Edit() As IPrxReport;
    Sheet := Report.Sheets.Item[0];
    Headers := Sheet.HeadersFooters;
    // Настроим отступ колонтитулов для первой страницы
    Param := Headers.FirstPageHeader;
    Param.Margin := 30;
    Param := Headers.FirstPageFooter;
    Param.Margin := 30;
    // Учтем настройки для первой страницы
    Headers.DifferentFirstPageHeaderFooter := True;
    System.Diagnostics.Debug.Writeline("Отступ верхнего колонтитула первой страницы: " + 
        Headers.FirstPageHeader.Margin.ToString());
    System.Diagnostics.Debug.Writeline("Отступ нижнего колонтитула первой страницы: " + 
        Headers.FirstPageFooter.Margin.ToString());
    (Report As IMetabaseObject).Save();
End Sub;

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

См. также:

IPrxSheetHeaders