ТочечныйОбъектГеографическойСхемы.ОграничивающийПрямоугольник

Построить два собственных пункта на пустой географической схеме

Создаём слой точечных объектов, задаём координаты и идентификаторы; проверяем поиск и ограничивающий прямоугольник.

Подготовка

1. Собственная учебная база 8.5.1.1343, толстый клиент Windows. ГеографическаяСхема из этого урока недоступна в тонком/веб-клиенте: не вставляйте код в тонкий клиент.

2. Создайте отдельную внешнюю обработку с управляемой формой, командой Выполнить и кнопкой этой команды. Вставьте весь код одного урока в модуль формы; назначьте команде обработчик Выполнить.

3. Каждый запуск создаёт новую схему в локальной переменной. Реквизиты карты и макеты не нужны; готовые карты, SHP, GPS и сервисы карт не загружаются.

4. Точки и зоны вымышленные учебные объекты. Координаты заданы в градусах, высота в метрах; это не местоположение пользователей или реальных заказов.

5. На схеме нет подложки с границами стран/дорогами. Это собственная геометрия, а не полноценный навигатор. Показать открывает отдельное окно схемы.

6. Запускайте уроки по одному. Статические проверки сверяют API установленной справки, но отрисовка и геометрические операции в 1С пока не проверены запуском.

&НаКлиенте
Процедура Выполнить(Команда)
    Схема = Новый ГеографическаяСхема;
    Схема.Обновление = Ложь;
    Схема.Проекция = ТипПроекцииГеографическойСхемы.ЦилиндрическаяРавноудаленнаяПроекция;
    Схема.СмещениеШироты = 0;
    Схема.СмещениеДолготы = 0;
    Пункты = Схема.Слои.Добавить("УчебныеПункты", Тип("ТочечныйОбъектГеографическойСхемы"));
    Пункты.Текст = "Учебные пункты";
    Пункты.Видимость = Истина;
    Пункты.РазрешитьВыбор = Истина;
    ПунктА = Пункты.Объекты.Добавить();
    ПунктА.Значение = "guide-point-A";
    ПунктА.Координаты = Новый ГеографическиеКоординаты(55, 37, 100);
    ПунктА.Видимость = Истина;
    ПунктА.ТипОтрисовки = ТипОтображенияТочечногоОбъектаГеографическойСхемы.Маркер;
    ПунктА.Маркер = ТипМаркераГеографическойСхемы.БольшойКруг;
    ПунктА.Цвет = Новый Цвет(25, 95, 180);
    ПунктА.ОтображатьДанные = Ложь;
    ПунктА.Подсказка = "Вымышленный пункт А; только учебные данные";
    ПунктА.Расшифровка = Новый Структура("УчебныйКод", "guide-point-A");
    ПунктБ = Пункты.Объекты.Добавить();
    ПунктБ.Значение = "guide-point-B";
    ПунктБ.Координаты = Новый ГеографическиеКоординаты(55.1, 37.2, 110);
    ПунктБ.Видимость = Истина;
    ПунктБ.ТипОтрисовки = ТипОтображенияТочечногоОбъектаГеографическойСхемы.Маркер;
    ПунктБ.Маркер = ТипМаркераГеографическойСхемы.БольшойТреугольник;
    ПунктБ.Цвет = Новый Цвет(35, 145, 75);
    Сообщить(Схема.Слои.Количество() = 1);
    Сообщить(Пункты.Имя = "УчебныеПункты");
    Сообщить(Пункты.ТипОбъектов = Тип("ТочечныйОбъектГеографическойСхемы"));
    Сообщить(Схема.Слои.Индекс(Пункты) = 0);
    Сообщить(Схема.Слои.Получить(0) = Пункты);
    Сообщить(Схема.Слои.Найти("Учебные пункты") = Пункты);
    Сообщить(Пункты.Объекты.Количество() = 2);
    Сообщить(Пункты.Объекты.Получить(0).Значение = "guide-point-A");
    Сообщить(Пункты.НайтиПоЗначению("guide-point-B") = ПунктБ);
    Сообщить(Пункты.НайтиПоЗначению("guide-missing") = Неопределено);
    Сообщить(ПунктА.Координаты.Широта = 55);
    Сообщить(ПунктА.Координаты.Долгота = 37);
    Сообщить(ПунктА.Координаты.Высота = 100);
    Сообщить(ПунктА.Слой = Пункты);
    Границы = Пункты.ОграничивающийПрямоугольник;
    Сообщить(Границы.ШиротаЮжнойГраницы <= 55 И Границы.ШиротаСевернойГраницы >= 55.1);
    Сообщить(Границы.ДолготаЗападнойГраницы <= 37 И Границы.ДолготаВосточнойГраницы >= 37.2);
    Сообщить(ТипЗнч(ПунктА.ОграничивающийПрямоугольник) = Тип("ПрямоугольникГеографическойСхемы"));
    Сообщить(ТипЗнч(Схема.ОграничивающийПрямоугольник) = Тип("ПрямоугольникГеографическойСхемы"));
    Схема.Обновление = Истина;
    Схема.Показать("Собственная учебная схема — guide-owned-geo");
КонецПроцедуры

Разбор по шагам

1. Конструктор координат принимает сначала широту, затем долготу, затем необязательную высоту. Градусы не являются метрами расстояния.

2. Тип объектов задаётся при Добавить слоя; Добавить объекта принимает ноль аргументов, а Координаты устанавливаются отдельно.

3. Имя слоя служебное, Текст — его подпись. Согласно описанию коллекции Слои.Найти ищет по тексту, поэтому передана подпись Учебные пункты.

4. Значение — собственный устойчивый ключ пункта. НайтиПоЗначению не ищет подсказку и не запрашивает адрес через интернет.

5. ОграничивающийПрямоугольник рассчитывается по объектам; его поля только для чтения. Проверяем, что он охватывает оба пункта.

6. На время построения обновление отключено, затем включено перед показом; это касается отрисовки, не записи базы.

Как проверить результат

1. Восемнадцать булевых проверок ожидаются Истина; покажутся два маркера без картографической подложки.

2. Наведите курсор на пункт А: подсказка поясняет учебный характер. Файлы и сеть не использованы.

Ожидаемый результат

Есть законченная небольшая схема с настоящими слоями, объектами, координатами и поиском.

На что обратить внимание

1. Не выдавать эту геометрию за карту дорог или навигационный маршрут.

2. Перестановка широты/долготы может дать допустимые, но неверные координаты.

3. Прямоугольник не создаётся через Новый и не заполняется присваиванием readonly-полей.

Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.