IVZResourceImage.Bitmap

Синтаксис

Bitmap: IGxBitmap;

Описание

Свойство Bitmap определяет изображение, которое будет использоваться в качестве маркера элемента легенды.

Комментарии

Перед заданием изображения должен быть определен пользовательский тип маркера с помощью свойства IVZSizeLegendMarker.Marker, принимающего значение Custom перечисления VisualizatorSizeMarkerShape.

Примечание. Для изменения маркера элемента легенды используйте свойство IVZResourceImage.ResourceId или IVZResourceImage.Bitmap.

Пример

Для выполнения примера предполагается наличие в репозитории экспресс-отчёта с идентификатором EXPRESS. В экспресс-отчёте должен быть выбран источник данных и визуализатор «Пузырьковое дерево» для отображения данных. В корне диска C должны содержаться пиктограммы Icon_big.ico, Icon_small.ico, которые будут использоваться в качестве маркеров легенды.

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

Sub UserProc;
Var
    Metabase: IMetabase;
    Analyzer: IEaxAnalyzer;
    BubbleTree: IVZBubbleTree;
    SizeLegend: IVZSizeLegend;
    LegendMarker: IVZSizeLegendMarker;
    BigImage, SmallImage: IVZResourceImage;
Begin
    // Получим репозиторий
    Metabase := MetabaseClass.Active;
    // Получим экспресс-отчёт
    Analyzer := Metabase.ItemById("EXPRESS").Edit As IEaxAnalyzer;
    // Получим пузырьковое дерево
    BubbleTree := Analyzer.BubbleTree.BubbleTree;
    // Получим размерную шкалу
    SizeLegend := BubbleTree.Legends.Item(1) As IVZSizeLegend;
    // Получим маркеры легенды
    LegendMarker := SizeLegend.Marker;
    // Установим маркеры
    LegendMarker.BigImage := New VZResourceImage.Create;
    LegendMarker.SmallImage := New VZResourceImage.Create;
    LegendMarker.Marker := VisualizatorSizeMarkerShape.Custom;
    // Зададим пиктограмму для максимального значения
    BigImage := LegendMarker.BigImage;
    BigImage.Bitmap := New GxBitmap.CreateFromFile("C:\Icon_big.ico"); 
    // Зададим пиктограмму для минимального значения
    SmallImage := LegendMarker.SmallImage;
    SmallImage.Bitmap := New GxBitmap.CreateFromFile("C:\Icon_small.ico");
    // Сохраним изменения в экспресс-отчёте
    (Analyzer As IMetabaseObject).Save;
End Sub UserProc;

В результате выполнения примера в экспресс-отчёте будут изменены пиктограммы размерной легенды пузырькового дерева на пользовательские пиктограммы Icon_big.ico, Icon_small.ico.

См. также:

IVZResourceImage