Таймер отсчета в 1С

31.08.20

–1

Обработка позволяет вам встроить таймер в любой объект метаданных конфигурации. Искал простой способ создания таймера, не нашел, сделал свою версию. Может кому то понадобится.

Скачать исходный код

	Наименование	Файл	Версия	Размер
	Таймер отсчета в 1С : .epf 6,50Kb 0	.epf		6,50Kb		Скачать

Открытый Код.

Работает во всех обычных формах.

Тестировалось на релизе платформы 8.3.10.2252.

Перем мВремя экспорт;
Перем НажатиеПауза экспорт;

//------Таймер------
Процедура СтартНажатие(Элемент)
    НажатиеПауза = Ложь;
    мВремя = Дата(1,1,1,0,0,0);
    ПодключитьОбработчикОжидания("ОбновитьВремя",1,Ложь);
    ЭлементыФормы.НадписьПотраченоВремени.Заголовок = "";
КонецПроцедуры

Процедура ОбновитьВремя()
    мВремя = мВремя + 1;
    ЭлементыФормы.НадписьВремя.Заголовок = "" + Формат(мВремя,"ДЛФ=T") + ""; 
КонецПроцедуры

Процедура ПаузаНажатие(Элемент)
    Если НажатиеПауза = Ложь Тогда
        НажатиеПауза = НЕ НажатиеПауза;
        ОтключитьОбработчикОжидания("ОбновитьВремя");
    ИначеЕсли НажатиеПауза = Истина Тогда
        ПодключитьОбработчикОжидания("ОбновитьВремя",1,Ложь);
        НажатиеПауза = Ложь;
    КонецЕсли;
КонецПроцедуры

Процедура СтопНажатие(Элемент)
    ОтключитьОбработчикОжидания("ОбновитьВремя");
    ЭлементыФормы.НадписьПотраченоВремени.Заголовок ="  Потрачено времени на задание " + Формат(мВремя,"ДЛФ=T") + "";
    мВремя = Дата(1,1,1,0,0,0);
    ЭлементыФормы.НадписьВремя.Заголовок = "" + Формат(мВремя,"ДЛФ=T") + "";
    НажатиеПауза = Ложь;
КонецПроцедуры
//------Таймер------

мВремя = Дата(1,1,1,0,0,0);
НажатиеПауза = Ложь;

Обработка таймер timer

–1

См. также

Богатый редактор картинок, хранимых в базе, с возможностью РИСОВАНИЯ. Редактор внешних файлов картинок. Объект, расширяющий возможности работы с картинками из встроенного языка (Три в одном) + Обработка «Стандартизация картинок»

Работа с интерфейсом Рабочее место Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Платные (руб)

Обработка предназначена для редактирования картинок в режиме «Предприятие», с возможностью РИСОВАТЬ на них. Поддерживается работа как в обычных формах (толстый клиент) так и на управляемых формах (тонкий клиент). Обработка позволяет редактировать как картинки, хранимые в базе, так и графические файлы с диска на файловой системе. Помимо базовых функций (изменение размеров, преобразование формата, обрезание картинки, повороты и т.п.) – редактор имеет богатый набор инструментов для рисования. Доступна функция вставки изображения из буфера обмена. Также обработка может быть использована из встроенного языка как объект для редактирования картинок. Объект может быть использован: на стороне клиента, на стороне сервера, из внешнего соединения. Данная обработка будет особенно полезна тем, кто вносит картинки в базу (изображения номенклатуры, фотографии физических лиц и т.п.). Функционал реализуется с использованием JavaScript и бесплатного ПО ImageMagick (без использования внешних компонент).

6000 руб.

16.01.2015 62232 43 59

Управление дашбордами

Работа с интерфейсом Платформа 1С v8.3 Конфигурации 1cv8 Платные (руб)

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

2400 руб.

29.06.2020 17065 22 4

Новогоднее оформление для 1С

Работа с интерфейсом Платформа 1С v8.3 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Зарплата и Управление Персоналом 3.x 1С:Управление нашей фирмой 3.0 Бесплатно (free)

Добавьте новогоднего настроения! Расширение создает декорацию в виде гирлянды на некоторых формах объектов.

27.12.2023 11473 769 elcoan 45

106

Конструктор HTML, CSS и javascript

Инструментарий разработчика Работа с интерфейсом Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

Подходит для создания web-страниц для замены управляемых форм 1С, красивых отчетов, интерфейса мобильного приложения на платформе 1С и для простых страниц веб-сайтов.

2 стартмани

10.04.2023 10075 155 acces969 31

119

Модель состояния для MVC

Работа с интерфейсом Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

"MVC плохо применима в 1С" - познакомьтесь с моделью состояния и, возможно, ваше мнение поменяется! Представленное решение является эволюционным развитием идеи реализации MVC для 1С. В новой версии добавлены DSL для описания модели состояния, а также параметризация свойств параметров и элементов формы.

1 стартмани

05.07.2022 4083 kalyaka 4

Табло очереди заказов на экран телевизора

WEB-интеграция Работа с интерфейсом Платформа 1С v8.3 1С:Розница 2 Платные (руб)

Связка из веб-приложения и расширения для 1С: Розница 2.3.

3600 руб.

29.04.2022 12439 1 5

Условное оформление элементов форм в пользовательском режиме 1С (управление видимостью и доступностью элементов форм)

Работа с интерфейсом Платформа 1С v8.3 Платные (руб)

Подсистема условного оформления элементов форм (далее подсистема) предназначена для настройки оформления элементов форм (видимость, доступность, цвет фона, цвет текста и прочее) в пользовательском режиме 1С. Также подсистему возможно использовать для ограничения доступа к реквизитам формы для определенных пользователей (или групп пользователей).

6000 руб.

18.01.2022 9033 1 2

Программный интерфейс для доработки форм

Работа с интерфейсом Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Реализовал простой способ программного создания новых элементов, команд и реквизитов на форме.

25.11.2021 9846 AtamanovYS 19

139

Комментарии

Подписаться на ответы Инфостарт бот

Свернуть все

1. ixijixi 1810 31.08.20 23:09 Сейчас в теме

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

Ответить

2. user665368_shakir.shirvanzade 1 31.08.20 23:14 Сейчас в теме

Я таймер нормальный нигде не нашел . Это мая версия которую смог написать.

3. stepan_s 01.09.20 07:14 Сейчас в теме

не претендую на оригинальность но яндекс (гугл) на запрос "таймер 1с" сходу предложил

Процедура ПаузаПустымЦиклом(Секунды)

ВремяОкончания = ТекущаяДата() + Секунды;
Пока ТекущаяДата() <= ВремяОкончания Цикл
КонецЦикла;

КонецПроцедуры

я лично не люблю этот скрипт потому, как идет бестолковая нагрузка на комп.
Более мне наравится подобное:

WScript = Новый COMОбъект("WScript.Shell");
WScript.Run("timeout /t " + Секунды, 0, Ложь);

а вообще стоит поиск использовать, и можно много найти, вот например:
https://forum.infostart.ru/forum9/topic182004/