IDataAreaOwner.OwnerStyleSheet

Синтаксис Fore

OwnerStyleSheet: IStyleSheet;

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

OwnerStyleSheet: Prognoz.Platform.Interop.Drawing.StyleSheetClass;

Описание

Свойство OwnerStyleSheet определяет внешнюю таблицу стилей, используемую объектом.

Комментарии

Для работы с внутренней таблицей стилей используйте свойство IDataAreaOwner.OwnerInnerStyleSheet.

Пример Fore

Для выполнения примера в репозитории предполагается наличие рабочей книги с идентификатором «WORKBOOK_STYLE» и таблицы стилей с идентификатором «STYLE_TB».

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

Sub UserProc;
Var
    mb: IMetabase;
    Report: IDataAreaOwner;
    Style: IStyleSheet;
    StyleCont: IStyleContainer;
    StEntity: IStyledEntity;
Begin
    mb := MetabaseClass.Active;
    Report := mb.ItemById("WORKBOOK_STYLE").Edit As IDataAreaOwner;
    Style := mb.ItemById("STYLE_TB").Bind As IStyleSheet;
    Report.OwnerStyleSheet := Style;
    (Report As IMetabaseObject).Save;
End Sub UserProc;

В результате выполнения примера к рабочей книге «WORKBOOK_STYLE» будет подключена внешняя таблица стилей «STYLE_TB».

Пример Fore.NET

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

Imports Prognoz.Platform.Interop.Drawing;
Imports Prognoz.Platform.Interop.Express;
…
Public Shared Sub Main(Params: StartParams);
Var
    mb: IMetabase;
    Report: IDataAreaOwner;
    Style: StyleSheetClass;
Begin
    mb := Params.Metabase;
    Report := mb.ItemById["WORKBOOK_STYLE"].Edit() As IDataAreaOwner;
    Style := mb.ItemById["STYLE_TB"].Bind() As StyleSheetClass;
    Report.OwnerStyleSheet := Style;
    (Report As IMetabaseObject).Save();
End Sub;

См. также:

IDataAreaOwner