IMapLegend.BorderPen

Синтаксис

BorderPen: IGxPen;

Описание

Свойство BorderPen определяет параметры границы легенды.

Пример

Для выполнения примера предполагается наличие на форме компонентов Button, MapBox, UiMap с наименованиями Button1, MapBox1 и UiMap1 соответственно. UiMap1 является источником данных для MapBox1. К компоненту UiMap1 должна быть подключена карта, содержащая только картографический показатель.

Пример является обработчиком события OnClick для компонента Button1.

Добавьте ссылки на системные сборки: Drawing, ExtCtrls, Forms, Map.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Map: IMap;
    Layer: IMapLayer;
    Legend: IMapLegend;
    C: IGxColor;
Begin
    Map := UiMap1.Map;
    Legend := New DxMapLegend.Create As IMapLegend;
    Map.View.Legend := Legend;
    Legend.Visible := True;
    Legend.BeginUpdate;
    Layer := Map.Layers.FindByName("Regions");
    Legend.Visual := Layer.Visuals.Item(0);
    Legend.Color := GxColor.FromName("Info");
    C := GxColor.FromName("Blue");
    Legend.BorderPen := New GxPen.CreateSolid(C);
    Legend.EndUpdate;   
End Sub Button1OnClick;

После выполнения примера для картографического показателя будет отображена легенда. Стандартное оформление фона и границ легенды будет изменено:

См. также:

IMapLegend