Выполняет копирование графического слоя системы с заданными параметрами.

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

ZuluTools

Синтаксис:

Visual Basic:

LayerCopy(SrcLayerPath As String, NewLayerPath As String, NewLayerUsername As String) As Boolean

SrcLayerPath - полный путь к слою-источнику (откуда копируется слой).

NewLayerPath - полный путь к новому слою (куда копируется слой).

NewLayerUsername - пользовательское название нового слоя.

Описание:

Метод возвращает1, если операция прошла успешно, в противном случае метод возвращает 0.

Пример:

Private Sub Command5_Click()
           
    Dim tools As ZuluTools
    Set tools = New ZuluTools

    'копировать слой doma
    If tools.LayerCopy("c:\Program Files\Zulu 5.0\Examples\Termo\doma.b00", "d:\nastya\new\doma.b00", "Copy_doma") = 1 Then
        MsgBox "Слой скопирован"
    Else: MsgBox "Ощибка копирования"
    End If

End Sub