Возвращает/устанавливает стиль, которым на карте выделяются объекты мишени.

Применяется к:

MapDoc

Синтаксис:

Visual Basic:

Property TargetParams As HighlightParams

Описание:

Стиль задает цвет, толщину и вид линий и заливку (свойства объекта HighlightParams), которыми рисуются объекты мишени (Layer.TargetSelection). Новый стиль виден у объектов мишени после перерисовки карты - при ее сдвиге или после вызова метода DrawInMapExtents вида карты; само присваивание карту не перерисовывает.

Свойство возвращает копию стиля: изменения в ней на карту не действуют, пока копия не присвоена свойству обратно. В VBScript присваивание пишется без Set: Doc.TargetParams = P. Стиль общий для всех карт: ZuluGIS хранит его в настройках пользователя, а не в файле карты. Присвоенный стиль сразу получают все открытые карты, и он остается для карт, открытых или созданных позже; карту измененной он не отмечает: свойство Saved остается True.

Пример:

Пример делает мишень на рабочей карте синей толщиной 4 и помещает в мишень первый объект активного слоя.

Visual Basic:

Sub MapDoc_TargetParams
'Берем рабочую карту и копию стиля мишени
Set Doc = Zulu.ActiveMapDoc
Set P = Doc.TargetParams
P.LineColor = RGB(0, 0, 255)
P.LineWidth = 4
'Присваиваем стиль обратно - без Set
Doc.TargetParams = P
'Первый объект активного слоя - в мишень
Set L = Doc.Layers.Active
L.TargetSelection.AddElem L.ElementKeys.Item(1)
MsgBox "Объектов в мишени: " & L.TargetSelection.ElementKeys.Count
End Sub

Python:

import zulu

def Macro_MapDoc_TargetParams():
    # Берем рабочую карту и копию стиля мишени
    doc = zulu.App.ActiveMapDoc
    P = doc.TargetParams
    P.LineColor = 16711680
    P.LineWidth = 4
    # Присваиваем стиль обратно
    doc.TargetParams = P
    # Первый объект активного слоя - в мишень
    L = doc.Layers.Active
    L.TargetSelection.AddElem(L.ElementKeys.Item(1))
    print("Объектов в мишени:", L.TargetSelection.ElementKeys.Count)