Метод возвращает сдвиг штриха вдоль направления линии. (только для прерывистых линий)

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

LineStyleElement

Синтаксис:

Visual Basic:

Function GetLineShiftHor() As Double

Описание:

Метод возвращает то самое число в миллиметрах, которое задали методом SetLineShiftHor, - в том числе отрицательное.

У только что созданного элемента сдвиг равен 0. В штрих-пунктирных стилях сдвиг задан у дополнительных элементов, а у первого он нулевой: так штрихи разных элементов попадают в пропуски друг друга.

Пример:

Пример перечисляет сдвиги у элементов первых стилей слоя.

Visual Basic:

Sub LineStyleElement_GetLineShiftHor
'Берем активный слой карты
Set L = Zulu.ActiveMapDoc.Layers.Active
S = ""
'Нумерация стилей в коллекции с нуля, элементов в стиле - тоже
For i = 0 To 5
  Set lsd = L.LineStyles.Item(i)
  Set els = lsd.StyleElements
  For j = 0 To els.Count - 1
    S = S & "стиль " & lsd.Id & ", элемент " & j & ": сдвиг вдоль линии " & els.Item(j).GetLineShiftHor & vbCrLf
  Next
Next
MsgBox S
End Sub

Python:

import zulu

def Macro_LineStyleElement_GetLineShiftHor():
    # Берем активный слой карты
    L = zulu.App.ActiveMapDoc.Layers.Active
    # Нумерация стилей в коллекции с нуля, элементов в стиле - тоже
    for i in range(6):
        lsd = L.LineStyles.Item(i)
        els = lsd.StyleElements
        for j in range(els.Count):
            print("стиль", lsd.Id, ", элемент", j, ": сдвиг вдоль линии",
                  els.Item(j).GetLineShiftHor())