Часы, падающие снежинки в поле HTML.

19.12.13

Разработка - Работа с интерфейсом

Не знаю, есть ли что-то подобное здесь. Идея была в следующем: отображать часы сверху строкой. Способа "посекундного подергивания сервера" нужно было избежать. Вот и пришло на помощь поле HTML...
Перед новым годом в этом поле начинает падать снег))

Создаем новый макет с типом HTML документ. И вставляем туда:

< HTML>
< HEAD> < BODY on load=initsnow(); now() leftMargin=0 scroll=no topMargin=0 bgColor=#fcfaeb>
< CENTER>...
< SCRIPT> dayarray=new Array("Воскресенье","Понедельник","Вторник","Среда","Четверг","Пятница","Суббота") montharray=new Array ("января","февраля","марта","апреля","мая","июня","июля","августа","сентября", "октября","ноября","декабря") function now() { // Начало функции var date=new Date(); // Получаем доступ к обьекту var h=date.getHours(); var m=date.getMinutes(); var s=date.getSeconds(); // Секунды var day=dayarray[date.getDay()]; var month=montharray[date.getMonth()]; var date1=date.getDate(); var year=date.getYear(); // Добавим нолик спереди, если число меньше 10 if(h < 10) h="0"+h; if(m < 10) m="0"+m; if(s < 10) s="0"+s; // Пишем новую инфу в тестовое содержимое слоя document.getElementById("DinamDate").firstChild.nodeValue=date1+" "+month+" "+year+". "+day+". "+h+":"+m+":"+s; setTimeout("now()",500) // Вызываем функцию now() повторно, через 100 миллисекунд } < /SCRIPT> < SCRIPT type=text/javascript>

// Здесь размещаем скрипт "снега". < /SCRIPT> < /BODY> < /HTML>
 

***

Далее на форме создаем поле вида "Поле HTML документа" и реквизит ТекстЧасов типа "Сторка". Связываем их. И далее вставляем:

&НаКлиенте
Процедура ПриОткрытии(Отказ)
    ЗапуститьЧасы();
КонецПроцедуры
&НаСервере
Процедура ЗапуститьЧасы()
    Месяц = Число(Формат(ТекущаяДата(), "ДФ=M"));
    Если ((1 < Месяц) и (Месяц < 12)) Тогда 
        НазваниеМакета = "ДатаИВремя"
    Иначе
        НазваниеМакета = "ДатаИВремяИСнег";
    КонецЕсли;
    ТекстЧасов =  Обработки.МоиЧасы.ПолучитьМакет(НазваниеМакета).ПолучитьТекст();
КонецПроцедуры

 ***

Ии... вуаля!

Снежинками обзавелся уже давно.  Предновогодний синдром сделал свое дело. Smile

Скрипт снега №1.

Скрипт снега №2.

 ***

Функционирует это на 8.2 на управляемых формах.

Для удобства хотел сделать кнопку отключения эффекта снега на самом поле HTML, но необходимости пока нет. Оставлю Вам на "растерзание". Wink

Спасибо.

См. также

Работа с интерфейсом Системный администратор Программист Платформа 1С v8.3 Управляемые формы 1C:Бухгалтерия Платные (руб)

Механизм «Динамическое управление доступом к элементам форм объектов 1С8» предназначен для обеспечения возможности оперативного управления видимостью и доступностью элементов форм документов и справочников продуктов фирмы «1С» «1С:Предприятие 8». Решение универсальное, встраивается в любую конфигурацию с минимальными доработками, что позволяет без проблем обновлять типовые решения.

5000 руб.

14.01.2016    55441    17    23    

43

Работа с интерфейсом Программист Платформа 1С v8.3 1C:Бухгалтерия 1С:ERP Управление предприятием 2 Платные (руб)

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

2400 руб.

29.06.2020    19722    28    6    

44

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

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

20.08.2024    21859    mrXoxot    44    

128

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

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

27.05.2024    10974    smielka    37    

105

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

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

27.12.2023    17962    1225    elcoan    53    

125

Инструментарий разработчика Работа с интерфейсом Программист Платформа 1С v8.3 1C:Бухгалтерия Абонемент ($m)

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

3 стартмани

10.04.2023    12657    167    acces969    31    

126

Работа с интерфейсом Программист Платформа 1С v8.3 1C:Бухгалтерия Абонемент ($m)

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

1 стартмани

05.07.2022    7379    kalyaka    6    

33
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. simuljakr 204 28.12.11 11:37 Сейчас в теме
Что то снег не идет (
А можете выложить прикрепленный html-файл со снегом ?
2. MCitrus 77 28.12.11 12:55 Сейчас в теме
Попробуйте вот в этом html-редакторе http://xhtml.ru/instr/html_editor/ скрипт с сайта http://syblog.ru/sneg-na-sajte/
3. mehalyna 04.01.14 17:29 Сейчас в теме
Попробовала по советам. Снег не идет(
4. MCitrus 77 09.01.14 17:03 Сейчас в теме
(3) mehalyna, должно работать)) В макете во вкладке "Просмотр" работает скрипт?
Можете прислать мне свою конфигурацию, я посмотрю. Или опишите подробнее.
5. andrewks 1375 09.01.14 17:15 Сейчас в теме
Оставьте свое сообщение