ФормаКлиентскогоПриложения.ОбновитьОтображениеДанных

Выполнить три собственных шага в состоянии покоя формы

Обработчик ожидания формы увеличивает собственное количество от 0 до 3 и выводит 250, 500, 750. Это не точный таймер и не наблюдение фонового задания.

Подготовка

1. В отдельной учебной базе платформы 8.5.1.1343 создайте внешнюю обработку УчебнаяФорма85 с пустой управляемой основной формой. Используйте тонкий клиент Windows.

2. В свойствах формы → События назначьте ПриСозданииНаСервере. Вставьте полный модуль урока, включая клиентские и серверные помощники, на уровне модуля.

3. Не создавайте вручную ЗначениеПримера, ПолеПримера и кнопку: код создаёт их полностью. Каждый урок запускайте в отдельной копии своей формы.

4. Сохраните свою EPF и откройте её в учебной базе. Собственное количество начинается с 3, цена книги задана в коде как 250; исходный расчёт равен 750.

5. Связанный реквизит помечен как СохраняемыеДанные для изучения поведения формы. Это признак реквизита формы, а не автоматическая запись книги, файла или документа в базу.

6. Команда расчёта имеет ИзменяетСохраняемыеДанные = Ложь. Уроки изменяют только свой интерфейс и значения собственной формы, не конфигурацию и не рабочие данные.

7. Запуск и вид в 1С не проверены. Компоновку, сочетания клавиш и расположение команд осмотрите вручную в указанном клиенте; не переносите настройки на рабочие формы без отдельной проверки.

Перем Запущено;

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
    Новые = Новый Массив;
    ТипРеквизита = Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(2, 0, ДопустимыйЗнак.Неотрицательный));
    Новые.Добавить(Новый РеквизитФормы("ЗначениеПримера", ТипРеквизита, "", "Количество книг", Истина));
    ЭтаФорма.ИзменитьРеквизиты(Новые);
    ЭтаФорма.ЗначениеПримера = 3;
    Поле = Элементы.Добавить("ПолеПримера", Тип("ПолеФормы"));
    Поле.Вид = ВидПоляФормы.ПолеВвода;
    Поле.ПутьКДанным = "ЗначениеПримера";
    Поле.Заголовок = "Количество собственных книг";
    Поле.ТолькоПросмотр = Истина;

    КомандаДействия = ЭтаФорма.Команды.Добавить("УчебноеДействие");
    КомандаДействия.Действие = "УчебноеДействие";
    КомандаДействия.Заголовок = "Выполнить собственный учебный шаг";
    КомандаДействия.Подсказка = "Действие только над данными учебной формы";
    КомандаДействия.ИзменяетСохраняемыеДанные = Ложь;
    Кнопка = Элементы.Добавить("КнопкаУчебноеДействие", Тип("КнопкаФормы"));
    Кнопка.ИмяКоманды = КомандаДействия.Имя;
    Кнопка.Заголовок = КомандаДействия.Заголовок;
КонецПроцедуры

&НаКлиенте
Процедура УчебноеДействие(Команда)
    Если Запущено = Истина Тогда
        Сообщить("Собственный проход уже запущен");
        Возврат;
    КонецЕсли;
    Если Не ЭтаФорма.ВводДоступен() Тогда
        Сообщить("Форма сейчас не допускает ввод; проход не запускается");
        Возврат;
    КонецЕсли;
    ЗначениеПримера = 0;
    Запущено = Истина;
    Элементы.КнопкаУчебноеДействие.Доступность = Ложь;
    Попытка
        ЭтаФорма.ПодключитьОбработчикОжидания("СледующийСобственныйШаг", 1, Ложь);
    Исключение
        Запущено = Ложь;
        Элементы.КнопкаУчебноеДействие.Доступность = Истина;
        ВызватьИсключение;
    КонецПопытки;
    Сообщить("Ждём три собственных шага в состоянии покоя; точное время не гарантировано");
КонецПроцедуры

&НаКлиенте
Процедура СледующийСобственныйШаг() Экспорт
    Если Запущено <> Истина Тогда
        ЭтаФорма.ОтключитьОбработчикОжидания("СледующийСобственныйШаг");
        Возврат;
    КонецЕсли;
    Попытка
        Если ЗначениеПримера >= 3 Тогда
            ЭтаФорма.ОтключитьОбработчикОжидания("СледующийСобственныйШаг");
            Запущено = Ложь;
            Элементы.КнопкаУчебноеДействие.Доступность = Истина;
            Возврат;
        КонецЕсли;
        ЗначениеПримера = ЗначениеПримера + 1;
        Сумма = ЗначениеПримера * 250;
        ЭтаФорма.ОбновитьОтображениеДанных(Элементы.ПолеПримера);
        Сообщить(СтрШаблон("Собственный шаг %1 из 3; сумма %2", ЗначениеПримера, Сумма));
        Если ЗначениеПримера = 3 Тогда
            ЭтаФорма.ОтключитьОбработчикОжидания("СледующийСобственныйШаг");
            Запущено = Ложь;
            Элементы.КнопкаУчебноеДействие.Доступность = Истина;
            Сообщить(Сумма = 750);
        КонецЕсли;
    Исключение
        ЭтаФорма.ОтключитьОбработчикОжидания("СледующийСобственныйШаг");
        Запущено = Ложь;
        Элементы.КнопкаУчебноеДействие.Доступность = Истина;
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

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

1. Кнопка проверяет доступность ввода, сбрасывает только собственный реквизит и защищает проход от повторного запуска.

2. Подключаем клиентскую процедуру без параметров. Интервал 1 — положительное число секунд, Однократно = Ложь означает повторное подключение.

3. Обработчик вызывается только в состоянии покоя; реальный интервал может отличаться. Это не таймер для измерения времени.

4. Каждый вызов делает собственное вычисление, изменяет один реквизит и обновляет отображение именно его поля. В обработчике ожидания такая выборочная форма вызова имеет смысл.

5. После третьего шага явно отключаем обработчик и разблокируем кнопку. При ошибке отключение и восстановление выполняются отдельно; при закрытии формы платформа прекращает вызовы.

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

1. Дождитесь собственных шагов 1/250, 2/500, 3/750, затем Истина. Четвёртого шага нет, кнопка снова доступна.

2. Нажмите повторно: начинается новый собственный проход 0…3. Откройте диалог или временно заблокируйте приложение вручную в учебной базе: не ожидайте точного секундного расписания.

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

Показаны настоящий обработчик ожидания формы, выборочное обновление и завершение собственного конечного прохода.

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

1. При интервале меньше 1 третий параметр должен быть Истина. Этот повторный пример использует ровно 1.

2. Не используйте ожидание формы как точный таймер; при занятости приложения вызовы откладываются.

3. ОбновитьОтображениеДанных с выборочным параметром не имеет такого же смысла в обычном обработчике кнопки; в веб-клиенте обновление откладывается до окончания BSL-кода.

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