Часы, падающие снежинки в поле 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 Конфигурации 1cv8 Платные (руб)

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

2400 руб.

29.06.2020    17318    23    4    

37

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

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

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

27.12.2023    11903    780    elcoan    47    

109

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

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

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

2 стартмани

10.04.2023    10371    157    acces969    31    

120

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

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

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

1 стартмани

05.07.2022    4315    kalyaka    4    

31

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

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

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

6000 руб.

18.01.2022    9183    1    2    

6

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

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

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

25.11.2021    10210    AtamanovYS    19    

142
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. simuljakr 203 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 1370 09.01.14 17:15 Сейчас в теме
Оставьте свое сообщение