IMapIconScale.Icon

Синтаксис

Icon(Index: Integer; Impact: MapScaleSettingImpact): IGxImage;

Параметры

Index - индекс деления шкалы.

Impact - определяет положение относительно значения деления шкалы.

Описание

Свойство Icon определяет пиктограмму для заданного значения деления шкалы.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента UiMap с наименованием «UiMap1», являющегося источником данных для компонента MapBox. К компоненту UiMap1 должна быть подключена карта. Также должен быть реализован класс VisualDataAdapter, создающий динамический источник данных. Пример данного класса содержится в описании свойства IMapVisual.DataAdapter. В файловой системе должны присутствовать файлы «C:\Greater.gif», «C:\Exact.gif» и «C:\Less.gif», содержащие изображение.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);

Var

Map: IMap;

Layer: IMapLayer;

ImageVisual: IMapImageVisual;

ImageProp: IMapVisualIconProperty;

Scale: IMapIconScale;

Begin

Map := UiMap1.Map;

Layer := Map.Layers.FindByName("Regions");

ImageVisual := Layer.Visuals.AddImageVisual;

ImageVisual.DataAdapter := New VisualDataAdapter.Create As IMapDynamicDataAdapter;

ImageProp := ImageVisual.Image;

ImageProp.DataAdapter := ImageVisual.DataAdapter;

ImageVisual.Height.Value := 2;

ImageVisual.Width.Value := 2;

ImageProp.Dependent := True;

Scale := ImageProp.Scale;

Scale.Count := 1;

Scale.Value(0) := 50;

Scale.Icon(0, MapScaleSettingImpact.Greater) := GxImage.FromFile("C:\Greater.gif");

Scale.Icon(0, MapScaleSettingImpact.Exact) := GxImage.FromFile("C:\Exact.gif");

Scale.Icon(0, MapScaleSettingImpact.Less) := GxImage.FromFile("C:\Less.gif");

End Sub Button1OnClick;

После выполнения примера на слой «Regions» будет добавлен пиктографический показатель. Пиктограмма показателя будет определяться шкалой:

Значения больше пятидесяти обозначаются пиктограммой ; значения меньше пятидесяти - ; значения равные пятидесяти - .

См. также:

IMapIconScale