Самый простой и доступный способ — использовать диалог «Предупреждение» с заданным в качестве параметра необходимым таймаутом:
|
1 2 3 4 5 |
Предупреждение("Пауза!",60); или Если Вопрос("Перепроведение?", РежимДиалогаВопрос.ОКОтмена, 60) = КодВозвратаДиалога.Отмена Тогда Возврат; КонецЕсли; |
Пауза, задержка времени при помощи цикла в 5 минут, т.е. 300 секунд:
|
1 2 3 4 5 |
сек = 300; КонДата = ТекущаяДата() + сек; Пока ТекущаяДата() < КонДата Цикл // ОЖИДАЕМ!!! КонецЦикла; |
Для паузы можно использовать следующий пример:
|
1 2 3 4 |
Процедура глПауза(Сек) scr = Новый COMОбъект("WScript.Shell"); scr.Run("sleep "+СокрЛП(Число(Сек)),0,1); КонецПроцедуры; |
Код для 1С 7:
|
1 2 3 4 |
Процедура глПауза(Сек) scr = СоздатьОбъект("WScript.Shell"); scr.Run("sleep "+СокрЛП(Число(Сек)),0,1); КонецПроцедуры; |