С наступающим Новым Годом (Елочка, зажгись)

26.12.11

Задачи пользователя - Поздравления

Подборка новогодних анимированных елочек на рабочий стол (26)

Скачать файлы

Наименование Файл Версия Размер
ChristmasTrees.rar
.rar 7,57Mb
44
.rar 7,57Mb 44 Скачать

В архиве 26 елочек. Кидаем в сетевую папку , расшариваем.

2 константы (активность сервиса и путь к папке) 

В процедуру ПриНачалеРаботыСистемы() прописываем процедуру  ЕлочкаЗажгись()

Процедура ЕлочкаЗажгись() Экспорт
Если Константы.ЕлочкаЗажгись.Получить() = Истина Тогда
ПутьКПапке = Константы.ЕлочкаПуть.Получить();

МассивНайденных = НайтиФайлы(ПутьКПапке, "*.exe"); 

МассивНайденных.Количество();

ГСЧ = Новый ГенераторСлучайныхЧисел();

Если МассивНайденных.Количество() <> 0 Тогда
СлучЧисло = ГСЧ.СлучайноеЧисло(0 , МассивНайденных.Количество()-1);
ПутьКЕлочке = МассивНайденных.Получить(СлучЧисло).ПолноеИмя;

 ЗапуститьПриложение(ПутьКЕлочке);
КонецЕсли;
КонецЕсли;
КонецПроцедуры 

 

P.S. Внимание, ехе очень любят прописываться в автозагрузку.  

См. также

Оформление к 8 марта для 1С

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

Расширение - поздравлялка с 8 марта. Добавляет цветочки на некоторые формы объектов, в честь 8 марта. Использование - для всех желающих.

05.03.2024    3399    218    zakharov_yuri    13    

24

Здравствуй, ж...ёлтая программа, Новый Год!

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

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

28.12.2023    1497    e.kogan    4    

5

Валентинки 1C

Поздравления Бесплатно (free)

Сделали эти валентинки для любимых клиентов и коллег.

14.02.2023    1440    ystetsenko    1    

7

Поздравление с Новым годом

Поздравления Платформа 1С v8.3 1С:Управление торговлей 11 Абонемент ($m)

Расширение - поздравление с Новым годом.

1 стартмани

19.11.2022    2023    8    mrSallivan    2    

6

Поздравление сотрудников с праздниками

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

Обработка-открытка для поздравления с праздниками.

4 стартмани

09.12.2021    3303    3    user610182_firstbit70    2    

3

Поздравление с 8 Марта

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

Поздравление прекрасной половины пользователей с 8 марта!

2 стартмани

01.03.2021    4147    13    IceEvgen    3    

1

Поздравления с праздниками для УТ 11

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

Поздравления с праздниками для УТ 11 при начале работы системы в виде расширения.

1 стартмани

26.02.2021    3426    6    burgomister    0    

4

Поздравление с новым годом

Поздравления Платформа 1С v8.3 Управляемые формы 1С:ERP Управление предприятием 2 Россия Абонемент ($m)

Поздравления коллег с наступающим новым годом.

1 стартмани

22.12.2020    3877    5    cheromg    0    

3
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
0. dmsoft 106 01.01.70 03:00 Сейчас в теме
Подборка новогодних анимированных елочек на рабочий стол (26)

Перейти к публикации

1. gutentag 253 27.12.11 02:00 Сейчас в теме
Спасибо. а как в бух-2.0 дописать новые константы идописать процедуру ПриНачалеРаботыСистемы() , не снимая конфу с поддержки 1С ?

Спасибо за ответ :)
2. Angry 11 28.12.11 08:32 Сейчас в теме
Нужно включить возможность изменения.
Это с поддержки не снимет, но автоматического обновления не будет.
3. НатальяАлекс 34 28.12.11 12:49 Сейчас в теме
Идея не нова. Зачем 26 елочек?
4. НатальяАлекс 34 28.12.11 12:51 Сейчас в теме
И снимать с поддержки ради елочки не улыбается.
5. accnt 28.12.11 14:58 Сейчас в теме
6. icich 28.12.11 16:03 Сейчас в теме
здорово, что там именно 26 елочек . Праздника очень хочется! А настроения нет...
7. lonsby 68 30.12.11 12:40 Сейчас в теме
Для терминалки добавил код при завершении 1с, чтобы убирался процесс

Процедура ПриЗавершенииРаботыСистемы()
	КомандаСистемы("TASKKILL /F /FI ""USERNAME eq " + ИмяПользователя());
	//КомандаСистемы("TASKKILL /F /FI ""USERNAME eq " + ИмяПользователя() + """ /IM "+ ИмяПроцесса);	
КонецПроцедуры
8. пользователь 09.01.12 13:00
Сообщение было скрыто модератором.
...
9. milkers 2859 19.12.18 11:18 Сейчас в теме
(0) Поздравление на управляемых формах https://infostart.ru/public/960899/
Оставьте свое сообщение