Устанавливает слой, в который будут записываться данные, полученные из приемника GPS/ГЛОНАСС.

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

ZGps

Синтаксис:

Visual Basic:

Function SetTargetLayer(Layer As Layer) As Boolean

Layer - слой системы Zulu в формате GPX.

Описание:

В случае успеха метод возвращает значение True.

В противном случае метод вернет False.

Пример:

'Объявляем глобальную переменную
Public gps1 As ZGps

'Процедура создания и инициализации объекта ZGps
Private Sub Command1_Click() 

Dim lyr As Layer

'Создаем объект ZGps
Set gps1 = New ZGps

'Устанавливаем порт СОМ1
gps1.Port = 1

'Устанавливаем скорость обмена 9600
gps1.BaudRate = eCBR_9600


'Берем активный слой карты
Set lyr = MapCtrl1.Map.Layers.Active

'Устанавливаем слой, куда будут записываться данные из приемника GPS/ГЛОНАСС
If (gps1.SetTargetLayer(lyr)) Then

'Запускаем процесс обработки данных
gps1.Start

'Начинаем запись трека "Test track"
gps1.StartTrack "Test track"

 End If

End Sub

'Процедура остановки записи
Private Sub Command2_Click()

'Останавливаем запись и сохраняем трек в файл слоя
gps1.StopTrack


'Останавливаем процесс обработки данных
gps1.Stop

End Sub