AOffset: Integer;
AOffset: integer;
Свойство AOffset определяет уровень прозрачности цвета.
Возможные значения находятся в диапазоне [0; 255]. Чем ближе значение к 0, тем выше прозрачность.
Для определения интенсивности красной составляющей цвета используйте IVZHighlightEffect.ROffset.
Для определения интенсивности зеленой составляющей цвета используйте IVZHighlightEffect.GOffset.
Для определения интенсивности синей составляющей цвета используйте IVZHighlightEffect.BOffset.
Для использования примера в репозитории необходимо наличие экспресс-отчета с идентификатором «EXPRESS», содержащего карту.
Добавьте ссылки на системные сборки: Express, Metabase, Visualizators.
Sub UserProc;
Var
MB: IMetabase;
Exp: IEaxAnalyzer;
Map: IVZMapChart;
Effect: IVZHighlightEffect;
Begin
// Получим репозиторий
MB := MetabaseClass.Active;
// Получим экспресс-отчет
Exp := MB.ItemById("EXPRESS").Edit As IEaxAnalyzer;
// Получим карту
Map := Exp.MapChart.MapChart;
// Создадим эффект засветления
Effect := New VZHighlightEffect.Create;
Effect.AOffset := 100;
Effect.ROffset := 45;
Effect.GOffset := 75;
Effect.BOffset := 100;
// Создадим объект для работы с эффектами
Map.HoverActiveEffects := New VZEffects.Create;
// Добавим эффект при наведении на активный элемент карты
Map.HoverActiveEffects.Add(Effect);
// Обновим и сохраним отчет
Exp.MapChart.Refresh;
(Exp As IMetabaseObject).Save;
End Sub UserProc;
После выполнения примера при наведении на активную территорию карты в экспресс-отчете будет применен эффект засветления.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Visualizators;
…
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
Exp: IEaxAnalyzer;
Map: IVZMapChart;
Effect: IVZHighlightEffect;
Begin
// Получим репозиторий
MB := Params.Metabase;
// Получим экспресс-отчет
Exp := MB.ItemById["EXPRESS"].Edit() As IEaxAnalyzer;
// Получим карту
Map := Exp.MapChart.MapChart;
// Создадим эффект засветления
Effect := New VZHighlightEffect.Create();
Effect.AOffset := 100;
Effect.ROffset := 45;
Effect.GOffset := 75;
Effect.BOffset := 100;
// Создадим объект для работы с эффектами
Map.HoverActiveEffects := New VZEffects.Create();
// Добавим эффект при наведении на активный элемент карты
Map.HoverActiveEffects.Add(Effect);
// Обновим и сохраним отчет
Exp.MapChart.Refresh();
(Exp As IMetabaseObject).Save();
End Sub;
См. также: