IVZTerritoryTranscript.HighlightBrush

Синтаксис Fore

HighlightBrush: IGxBrush;

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

HighlightBrush: Prognoz.Platform.Interop.Drawing.IGxBrush;

Описание

Свойство HighlightBrush определяет настройки кисти для подсветки элементов расшифровки территорий.

Комментарии

Для определения максимального количества элементов в расшифровке используйте IVZTerritoryTranscript.MaxItemsCount.

Пример Fore

Для выполнения примера в репозитории необходимо наличие экспресс-отчета с идентификатором «EXPRESS», содержащего карту.

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

Sub UserProc;
Var
    MB: IMetabase;
    Express: IEaxAnalyzer;
    MC: IVZMapChart;
    TT: IVZTerritoryTranscript;
Begin
    // Получим репозиторий
    MB := MetabaseClass.Active;
    // Получим экспресс-отчет
    Express := MB.ItemById("EXPRESS").Edit As IEaxAnalyzer;
    // Получим карту
    MC := Express.MapChart.MapChart;
    // Получим расшифровку территорий
    TT := MC.TerritoryTranscript;
    // Включим расшифровку территорий
    TT.Visible := True;
    // Определим цвет подсветки элементов расшифровки территорий
    TT.HighlightBrush := New GxSolidBrush.Create(GxColor.FromName("Red"));
    // Сохраним изменения
    (Express As IMetabaseObject).Save;
End Sub UserProc;

После выполнения примера при наведении курсора на необходимую территорию будет подсвечен красным цветом соответствующий элемент расшифровки.

Пример Fore.NET

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

Imports Prognoz.Platform.Interop.Drawing;
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Visualizators;
…
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    Express: IEaxAnalyzer;
    MC: IVZMapChart;
    TT: IVZTerritoryTranscript;
    Brush: GxSolidBrush = New GxSolidBrushClass();
    ColorClass: GxColorClass = New GxColorClassClass();
    Color: GxColor;
Begin
    // Получим репозиторий
    MB := Params.Metabase;
    // Получим экспресс-отчет
    Express := MB.ItemById["EXPRESS"].Edit() As IEaxAnalyzer;
    // Получим карту
    MC := Express.MapChart.MapChart;
    // Получим расшифровку территорий
    TT := MC.TerritoryTranscript;
    // Включим расшифровку территорий
    TT.Visible := True;
    // Определим цвет подсветки элементов расшифровки территорий
    Color := ColorClass.FromName("Red");
    Brush.Create(Color);
    TT.HighlightBrush := Brush;
    // Сохраним изменения
    (Express As IMetabaseObject).Save();
End Sub;

См. также:

IVZTerritoryTranscript