IPrxDataIslandProperties.TableStyle

Синтаксис Fore

TableStyle: ITabTableStyle;

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

TableStyle: Prognoz.Platform.Intertop.Tab.ITabTableStyle;

Описание

Свойство TableStyle определяет стиль оформления таблицы области данных.

Пример Fore

Для выполнения примера предполагается наличие в репозитории регламентного отчета «REPORT». Добавьте ссылки на системные сборки «Report», «Metabase» и «Tab».  В данный регламентный отчет добавлен минимум один источник данных. На базе среза этого источника построена область данных.

Sub UserProc;
Var
    MB: IMetabase;
    Rep: IPrxReport;
    DataIs: IPrxDataIsland;
    DataIsProp: IPrxDataIslandProperties;
    TabStyle: ITabTableStyle;
Begin
    MB := MetabaseClass.Active;
    Rep := MB.ItemById("REPORT").Edit As IPrxReport;
    DataIs := Rep.DataIslands.Item(0).Edit;
        DataIsProp := DataIs.Properties;
        TabStyle := DataIsProp.TableStyle;
        TabStyle.AssignPredefined(TabTablePredefinedStyle.Orange);
    DataIs.Save;
   (Rep As IMetabaseObject).Save;
End Sub UserProc;

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

Пример Fore.NET

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

Sub UserProc(Params: StartParams);
Var
    MB: IMetabase;
    Rep: IPrxReport;
    DataIs: IPrxDataIsland;
    DataIsProp: IPrxDataIslandProperties;
    TabStyle: ITabTableStyle;
Begin
    MB := Params.Metabase;
    Rep := MB.ItemById["Report"].Edit() As IPrxReport;
    DataIs := Rep.DataIslands.Item[0].Edit();
        DataIsProp := DataIs.Properties;
        TabStyle := DataIsProp.TableStyle;
        TabStyle.AssignPredefined(TabTablePredefinedStyle.ttpsOrange);
    DataIs.Save();
    (Rep As IMetabaseObject).Save();
End Sub UserProc;

См. также:

IPrxDataIslandProperties