ItemsStyle: IVZLabelStyle;
ItemsStyle: Prognoz.Platform.Interop.Visualizators.VZLabelStyle;
Свойство ItemsStyle определяет стиль элементов цепочки навигации.
Для выполнения примера предполагается наличие в репозитории экспресс-отчета с идентификатором «EXP». Модуль, в котором размещается пример, должен иметь ссылки на системные сборки Express, Metabase, Drawing и Visualizators. Указанная процедура должна вызываться из точки входа Main.
До выполнения примера цепочка навигации плоского дерева выглядит так, как показано на странице описания интерфейса IVZBreadcrumb. Изменим цвет шрифта текстовых меток цепочки навигации плоского дерева:
Sub UserProc;
Var
Metabase: IMetabase; // Метабаза
EaxAnalyzer: IEaxAnalyzer; // Экспресс-отчёт
TreeMap: IVZTreeMap; // Плоское дерево
Breadcrumb: IVZBreadcrumb; // Цепочка навигации
ItemsStyle: IVZLabelStyle; // Стиль текстовых меток
Begin
// Получим объект метабазы
Metabase := MetabaseClass.Active;
// Получим объект экспресс-отчёта
EaxAnalyzer := Metabase.ItemById("EXP").Edit As IEaxAnalyzer;
// Получим плоское дерево
TreeMap := EaxAnalyzer.TreeMap.TreeMap;
// Получим цепочку навигации
Breadcrumb := TreeMap.Breadcrumb;
// Получим стиль текстовых меток цепочки навигации
ItemsStyle := Breadcrumb.ItemsStyle;
// Изменим цвет шрифта текстовых меток
ItemsStyle.FontColor := New GxColor.CreateRGB(255, 229, 180);
// Установим новое значение стиля
Breadcrumb.ItemsStyle := ItemsStyle;
// Сохраним экспресс-отчет
(EaxAnalyzer As IMetabaseObject).Save;
End Sub UserProc;
В результате выполнения примера был изменен цвет шрифта текстовых меток цепочки навигации плоского дерева:
Для выполнения примера предполагается наличие в репозитории экспресс-отчета с идентификатором «EXP». Указанная процедура является точкой входа Main в модуле Program .NET-сборки. В данный модуль должны быть импортированы сборки Express, Metabase, Drawing и Visualizators из системной сборки Prognoz.Platform.Interop.
До выполнения примера цепочка навигации плоского дерева выглядит так, как показано на странице описания интерфейса IVZBreadcrumb. Изменим цвет шрифта текстовых меток цепочки навигации:
Public Shared Sub Main(Params: StartParams);
Var
Metabase: IMetabase; // Метабаза
EaxAnalyzer: IEaxAnalyzer; // Экспресс-отчёт
TreeMap: IVZTreeMap; // Плоское дерево
Breadcrumb: IVZBreadcrumb; // Цепочка навигации
ItemsStyle: IVZLabelStyle; // Стиль текстовых меток
FontColor: GxColor; // Цвет шрифта
Begin
// Получим объект метабазы
Metabase := Params.Metabase;
// Получим объект экспресс-отчёта
EaxAnalyzer := Metabase.ItemById["EXP"].Edit() As IEaxAnalyzer;
// Получим плоское дерево
TreeMap := EaxAnalyzer.TreeMap.TreeMap;
// Получим цепочку навигации
Breadcrumb := TreeMap.Breadcrumb;
// Получим стиль текстовых меток цепочки навигации
ItemsStyle := Breadcrumb.ItemsStyle;
// Изменим цвет шрифта текстовых меток
FontColor := New GxColor();
FontColor.CreateRGB(255, 229, 180);
ItemsStyle.FontColor := FontColor;
// Сохраним экспресс-отчет
(EaxAnalyzer As IMetabaseObject).Save();
End Sub;
Результат выполнения примера аналогичен результату, полученному после выполнения примера для языка Fore.
См. также: