<< Click to Display Table of Contents >> Navigation:  Раздел 7 Расширения языка L9 > Работа с координатами > Объект ГПС (GPS) > Методы > <ГПС> УстановитьПриИзмененииСтатуса (SetOnStatusChanged)

Описание:

Устанавливает обработчик события "ПриИзмененииСтатуса".

Синтаксис:

УстановитьПриИзмененииСтатуса(<Обработчик>)

SetOnStatusChanged(<Handler>)

Параметры:

Обработчик (Handler) – обработчик события изменения статуса приемника.

Возвращаемые значения:

Нет.

Пример:

//При выполнении функции "Форма_ПриИнициализации"

//устанавливается обработчик события "ПриИзмененииСтатуса".
//Если GPS-приемник включен, выводится сообщение о том,
//что координаты получены. На форме в соответствующих
//надписях отображаются значения широты и долготы в формате NMEA.
//Если GPS-приемник выключен, выводится сообщение о том,
//что сигнал спутника потерян. На форме в соответствующих
//надписях отображается текст о том, что координаты не готовы.

Перем ВсплывающееСообщение;

Перем ГПС;
Перем ГПССтатус;
 
Функция ПриИзмененииСтатуса(Статус)
   Если Статус = Истина Tогда
       ЭтаФорма.НадписьКоординатыДолготы.Tекст = Строка(ГПС.ПолучитьДолготу());
       ЭтаФорма.НадписьКоординатыШироты.Tекст = Строка(ГПС.ПолучитьШироту());
       ВсплывающееСообщение.Tекст = "Связь установлена. Координаты получены";
   Иначе
       ЭтаФорма.НадписьКоординатыДолготы.Tекст = "Координаты не готовы";
       ЭтаФорма.НадписьКоординатыШироты.Tекст = "Координаты не готовы";
       ВсплывающееСообщение.Tекст = "Сигнал потерян.";
   КонецЕсли;
   ВсплывающееСообщение.Показать(1);
 
   Возврат 0;
КонецФункции

 

 

Функция Форма_ПриИнициализации()

   ВсплывающееСообщение = New ("ВсплывающееСообщение");
 
   ГПС = Новый("ГПС");
   ГПС.УстановитьПриИзмененииСтатуса(ПриИзмененииСтатуса);
   
   Возврат 0;
КонецФункции