Устанавливает режим мигания объекта слоя в памяти.
Visual Basic:
Sub SetBlink(ElemID As Long, Interval As Long)
ElemID - ID объекта.
Interval - интервал мигания объекта в миллисекундах. 0 - отсутствие мигания.
Заданный интервал читается методом GetBlink. Чтобы прекратить мигание, задается интервал 0.
Методы объекта InMemoryLayer действуют только тогда, когда слой загружен в память, то есть установлено свойство InMemory объекта Layer.
Visual Basic:
Sub InMemoryLayer_SetBlink 'Берем активный слой карты Set L = Zulu.ActiveMapDoc.Layers.Active 'Методы слоя в памяти действуют только когда слой загружен в память L.InMemory = True Set IML = L.InMemoryLayer 'Объект мигает с интервалом 500 мс IML.SetBlink 1, 500 MsgBox "Интервал мигания: " & IML.GetBlink(1) End SubPython:
import zulu def Macro_InMemoryLayer_SetBlink(): # Берем активный слой карты L = zulu.App.ActiveMapDoc.Layers.Active # Методы слоя в памяти действуют только когда слой загружен в память L.InMemory = True IML = L.InMemoryLayer # Объект мигает с интервалом 500 мс IML.SetBlink(1, 500) print("Интервал мигания:", IML.GetBlink(1))