Увеличивает счетчик изменений слоя.
Visual Basic:
Function SetModified() As Long
Метод возвращает новое значение счетчика: каждый вызов увеличивает его на единицу. Счетчик растет и сам, от любой правки данных - добавления объекта, удаления и других.
Метод нужен, когда слой изменили в обход объектной модели и надо, чтобы система считала данные изменившимися. Отметку времени последней правки возвращает метод GetLastChangesTime, но из VBScript он недоступен: у него выходные параметры, и вызов дает ошибку 13 («Несоответствие типа»).
Visual Basic:
Sub Layer_SetModified 'Берем активный слой карты Set L = Zulu.ActiveMapDoc.Layers.Active 'Отмечаем слой изменённым и смотрим счётчик S = "Счетчик изменений: " & L.SetModified S = S & vbCrLf & "следующий вызов: " & L.SetModified MsgBox S End SubPython:
import zulu def Macro_Layer_SetModified(): # Берем активный слой карты L = zulu.App.ActiveMapDoc.Layers.Active # Отмечаем слой изменённым и смотрим счётчик print("Счетчик изменений:", L.SetModified()) print("следующий вызов:", L.SetModified())