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

26.12.11

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

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

Бесплатные

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Узнавайте о новых бесплатных решениях в нашей телеграм-группе Инфостарт БЕСПЛАТНО

Наименование Скачано Бесплатно
ChristmasTrees.rar
.rar 7,57Mb
69 Скачать бесплатно

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

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

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

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

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

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

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

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

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

 

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

Вступайте в нашу телеграмм-группу Инфостарт

См. также

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

Расширение меняет заставку, цвет интерфейса и добавляет изображения на формы. Возможна персонализация для других конфигураций. Если вам понравилось расширение, не забудьте поставить плюсик!

11.12.2025    4234    523    NVKom    22    

21

Поздравления 1С:Бухгалтерия 3.0 Бесплатно (free)

Расширение позволяет поздравить пользователя, у которого сегодня День рождения. Выводит предупреждение при открытии системы.

19.05.2025    1617    33    SVLong    2    

1

Работа с интерфейсом Поздравления 1С:Предприятие 8 1C:Бухгалтерия Бесплатно (free)

Хотите сделать цифровую поздравительную открытку? Обработка умеет прятать секреты в картинки png.

26.12.2024    2931    26    dsdred    12    

8

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

Данная статья для меня юбилейная, и я решил устроить небольшой новогодний квест «Матрешка» с подарком для самого быстрого.

26.12.2024    4325    dsdred    34    

7

Поздравления 1С:Предприятие 8 1С:ERP Управление предприятием 2 Бесплатно (free)

Расширение конфигурации с гибкой настройкой: предопределенные праздники, возможность добавления праздников, индивидуальные праздники по пользователям Включает скачанные картинки для поздравления (в архиве).

04.12.2024    2156    175    user1242725    1    

4

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

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

05.03.2024    5830    277    zakharov_yuri    13    

25

Поздравления Программист 1С:Предприятие 8 Бесплатно (free)

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

28.12.2023    3351    e.kogan    4    

5

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

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

27.12.2023    25957    1675    elcoan    53    

132
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
0. dmsoft 107 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 3028 19.12.18 11:18 Сейчас в теме
(0) Поздравление на управляемых формах https://infostart.ru/public/960899/
Для отправки сообщения требуется регистрация/авторизация