Устанавливает стиль отображения полилинии, содержащий путь перемещения заданного объекта в памяти.
Visual Basic:
Sub SetTrackStyle(ElemID As Long, Style As ElemStyle)
ElemID - ID объекта.
Style - объект с атрибутами отображения полилинии.
Стиль применяется к полилинии, в которой накапливается путь перемещения. Прочитать текущий стиль можно методом GetTrackStyle.
Методы объекта InMemoryLayer действуют только тогда, когда слой загружен в память, то есть установлено свойство InMemory объекта Layer.
Visual Basic:
Sub InMemoryLayer_SetTrackStyle 'Берем активный слой карты Set L = Zulu.ActiveMapDoc.Layers.Active 'Методы слоя в памяти действуют только когда слой загружен в память L.InMemory = True Set IML = L.InMemoryLayer 'Путь будет рисоваться красной линией толщиной 2 Set st = CreateObject("ZuluLib.ElemStyle") st.LineColor = RGB(255, 0, 0) st.LineWidth = 2 IML.SetTrackStyle 1, st IML.StartTracking 1 MsgBox "Стиль пути задан" End SubPython:
import zulu def Macro_InMemoryLayer_SetTrackStyle(): # Берем активный слой карты L = zulu.App.ActiveMapDoc.Layers.Active # Методы слоя в памяти действуют только когда слой загружен в память L.InMemory = True IML = L.InMemoryLayer # Путь будет рисоваться красной линией толщиной 2 st = zulu.ElemStyle() # Цвет задается числом: красный + зеленый * 256 + синий * 65536 st.LineColor = 255 st.LineWidth = 2 IML.SetTrackStyle(1, st) IML.StartTracking(1) print("Стиль пути задан")