IPrxDataIslandProperties.Corner

Синтаксис Fore

Corner: IPrxDataIslandCorner;

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

Corner: Prognoz.Platform.Interop.Report.IPrxDataIslandCorner;

Описание

Свойство Corner возвращает объект, содержащий оформление угловой ячейки таблицы области данных.

Пример Fore

Для выполнения примера предполагается наличие регламентного отчета с идентификатором «REPORT», который содержит область данных. Добавьте ссылки на системные сборки: Metabase, Report.

Sub UserProc;
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    Prop: IPrxDataIslandProperties;
    DI: IPrxDataIsland;
Begin
    MB := MetabaseClass.Active;
    MObj := MB.ItemById(
"REPORT").Edit;
    DI := (MObj As IPrxReport).DataIslands.Item(0).Edit;
        Prop := DI.Properties;
        
// Задаем свойство "объединять угол таблицы".
        Prop.Corner.Merge := True;
    DI.Save;
    // Сохраняем отчет.
    MObj.Save;
End Sub UserProc;

После выполнения примера будет установлено объединение ячейки угла таблицы первой области данных регламентного отчета «REPORT».

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

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

Пример Fore.NET

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

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

...

Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    Prop: IPrxDataIslandProperties;
    DI: IPrxDataIsland;
Begin
    MB := Params.Metabase;
    MObj := MB.ItemById["REPORT"].Edit();
    DI := (MObj As IPrxReport).DataIslands.Item[0].Edit();
        Prop := DI.Properties;
        // Задаем свойство "объединять угол таблицы".
        Prop.Corner.Merge := True;
    DI.Save();
    // Сохраняем отчет.
    MObj.Save();
End Sub;

См. также:

IPrxDataIslandProperties