Сборник несерьезных обработок. Версия 3.

17.07.12

Разработка - Инструментарий разработчика

Разные обработки, которые не тянут на серьезные, но иногда просто нужно кому-то показать.

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

Наименование Файл Версия Размер
Подсчет сумм для различных комбинаций чисел (8.2)
.epf 10,76Kb
11
.epf 10,76Kb 11 Скачать
Шахматка
.1247148592 36,00Kb
41
.1247148592 36,00Kb 41 Скачать
Шахматка из Запроса
.1251455796 36,00Kb
11
.1251455796 36,00Kb 11 Скачать

Smile

1) Расчерчивание досок.

Появилась после плодотворного общения с Ёпрстом на форуме. Большое ему спасибо за оптимицазию кода.
Выложена по просьбе //infostart.ru/forum/messages/forum9/topic10235/message80805/#message80805

История версий:

2 от 10.07.2009. Добавлена возможность рисовать доски для игр "Крестики-нолики" и "Морской бой"

 

2) Формирование шахматки из запроса. Добавлено как пример для помощи на форуме Як зробити звіт шахматку?

 

3) 10.07.2012 Расчет сумм для комбинаций из N элементов.

Вчера мне попалась в руки интересная задачка - посчитать все комбинации сумм для N чисел.

                Пример :

                               Есть два числа 5 и 7  все комбинации сумм данных чисел будут  соответственно  = 5,7,12

                               Есть три числа 5, 7,9 все комбинации сумм данных числе будут соответственно = 5,7,9,12,14,16,21

 Начал я вспоминать комбинаторику, но в процессе подумал - а зачем? Smile

И в результате появился следующий алгоритм:

где   НаборДанных - табличная часть с исходными числами, Результат - табличная часть с результатом (суммами комбинаций)

 


    Для каждого Строка Из НаборДанных Цикл

       
ОбработкаПрерыванияПользователя();

       
ТекущееЗначение = Строка.Число;

       
КоличествоСтрок = Результат.Количество() - 1;

        Для
Инд = 0 По КоличествоСтрок Цикл



           
ОбработкаПрерыванияПользователя();

           
НоваяСумма = Результат[Инд].Сумма + ТекущееЗначение;



            Если Не
ТолькоУникальныеСуммы Или Результат.Найти(НоваяСумма, "Сумма") = Неопределено Тогда

               
НоваяСтрока = Результат.Добавить();

               
НоваяСтрока.Сумма = НоваяСумма;

               
НоваяСтрока.Комбинация = Результат[Инд].Комбинация + " + " + ТекущееЗначение;

            КонецЕсли;



        КонецЦикла;

        Если Не
ТолькоУникальныеСуммы Или Результат.Найти(ТекущееЗначение, "Сумма") = Неопределено Тогда

           
НоваяСтрока = Результат.Добавить();

           
НоваяСтрока.Сумма = ТекущееЗначение;

           
НоваяСтрока.Комбинация = ТекущееЗначение;

        КонецЕсли;

    КонецЦикла;



Полная обработка для вычислений находится в файлах

17.07.2012 Обновил. Теперь выводятся и комбинации, из которых получилась данная сумма. Плюс возможность выбора по флажку уникальных или неуникальных сумм.

См. также

SALE! 20%

Infostart Toolkit: Инструменты разработчика 1С 8.3 на управляемых формах

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

Набор инструментов программиста и специалиста 1С для всех конфигураций на управляемых формах. В состав входят инструменты: Консоль запросов, Консоль СКД, Консоль кода, Редактор объекта, Анализ прав доступа, Метаданные, Поиск ссылок, Сравнение объектов, Все функции, Подписки на события и др. Редактор запросов и кода с раскраской и контекстной подсказкой. Доработанный конструктор запросов тонкого клиента. Продукт хорошо оптимизирован и обладает самым широким функционалом среди всех инструментов, представленных на рынке.

13000 10400 руб.

02.09.2020    122177    670    389    

714

SALE! 25%

Infostart PrintWizard

Пакетная печать Печатные формы Инструментарий разработчика Платформа 1С v8.3 Запросы 1С:Зарплата и кадры бюджетного учреждения 1С:Конвертация данных 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 Платные (руб)

Инструмент, позволяющий абсолютно по-новому взглянуть на процесс разработки печатных форм. Благодаря конструктору можно значительно снизить затраты времени на разработку печатных форм, повысить качество и "прозрачность" разработки, а также навести порядок в многообразии корпоративных печатных форм.

18000 15300 руб.

06.10.2023    7297    21    6    

39

SALE! 20%

Infostart УДиФ: Управление данными и формами

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

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

10000 8000 руб.

10.11.2023    3544    11    1    

34

SALE! 30%

PowerTools

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

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

3600 2520 руб.

14.01.2013    177758    1073    0    

849

Многопоточность. Универсальный «Менеджер потоков» 2.1

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

Восстановление партий или взаиморасчетов, расчет зарплаты, пакетное формирование документов или отчетов - теперь все это стало доступнее. * Есть желание повысить скорость работы медленных алгоритмов! Но... * Нет времени думать о реализации многопоточности? * о запуске и остановке потоков? * о поддержании потоков в рабочем состоянии? * о передаче данных в потоки и как получить ответ из потока? * об организации последовательности? Тогда ЭТО - то что надо!!!

5000 руб.

07.02.2018    99348    239    97    

296

[ЕХТ] Фреймворк для Расширений 1С

Инструментарий разработчика Платформа 1С v8.3 Управляемые формы Платные (руб)

"Фреймворк для Расширений 1С" это универсальное и многофункциональное решение, упрощающее разработку и поддержку создаваемых Расширений. Поставляется в виде комплекта из нескольких Расширений с открытым исходным кодом. Работает в любых Конфигурациях в режиме Управляемого приложения с режимом совместимости 8.3.12 и выше без необходимости внесения изменений в Конфигурацию.

3000 руб.

27.08.2019    18116    6    8    

39

1С HTML Шаблоны / HTML Templates

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

Быстрая и удобная обработка для работы с шаблонами HTML. Позволяет легко и быстро формировать код HTML.

2040 руб.

27.12.2017    28111    3    10    

15

Выполнение произвольного кода или запроса с параметрами через Web-сервис (замена COM-подключений)

Инструментарий разработчика Обмен между базами 1C Платформа 1С v8.3 Платные (руб)

В процессе работы в 1С часто возникает потребность получить данные из другой базы.  Обычно это делается через COM-соединение, и время выполнения запроса при этом оставляет желать лучшего. В данной публикации представлено универсальное решение, позволяющее практически моментально выполнить произвольный код или запрос с параметрами в другой информационной базе через Web-сервис.

2400 руб.

24.09.2019    23605    15    15    

32
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. Tatitutu 3855 09.07.09 21:05 Сейчас в теме
Добавь еще
- Морской бой
- крестики нолики
- Пулю для преферанса
3. Altair777 644 10.07.09 10:43 Сейчас в теме
(1) Спасибо за идею!
(2) В среде 1С? А разве еще никто этого не сделал?!
4. Altair777 644 10.07.09 13:51 Сейчас в теме
(1) Обновил. Скоро будет для преферанса.
Следите за анонсами! :-)
6. Ёпрст 1063 10.07.09 13:59 Сейчас в теме
(1) кроме префа это тоже всё есть.
7. Altair777 644 10.07.09 14:30 Сейчас в теме
(6) У меня тут идея появилась....
Не просто бумажку нарисовать с расчерченной пулей, а написать программу для ее расчета.
Пока вижу 2 трудности:
1) Различные варианты преферансов.
2) Красиво вывести на печать.
8. Арчибальд 2706 10.07.09 14:41 Сейчас в теме
(7) Ну, варианты-то легко будет размножить, если один напишешь.
Но вот мысль: вести запись игр (по сдачам).
По части вывода: с диагоналями заморачиваться вовсе не обязательно. Крестотабличный формат тоже рулит.
10. Altair777 644 10.07.09 15:01 Сейчас в теме
(8) это я когда-то давно-давно решал в Экселе :-)
На листе вносилось построчно кто и сколько заказал, и кто сколько взял взяток.
В скрытых столбцах шел расчет вистов по каждой сдаче и выводилось итого.
Увы, файл потерян. А на написание формул столько времени ушло...

(9) Нафик нам комп? Играть нужно в реале с людьми :-)
Можно даже и не на деньги.
У меня есть хорошие знакомые. Мы частенько играли с ними в преферанс, но просто так. По нескольким причинам. Например, то что они муж и жена и хорошо сыгранные между собой. :-)
Но все играли разумно. Мизеров просто так, наудачу, никто не заказывал.
11. Ёпрст 1063 10.07.09 15:13 Сейчас в теме
(10) Не... на просто так - это не интересно..все психуют почем зря, пропадает цель игры.
Любая карточная игра - только на деньги.. тогда есть и смысл и адреналин и т.д...
даже на копеечные.

А игра за комп - эт для тренировки..
13. vip 10.07.09 15:24 Сейчас в теме
14. Altair777 644 10.07.09 15:28 Сейчас в теме
(11) Кроме денег есть еще цели. Например, удовлетворение чувства собственной значимости :-)
И, как-то опасно садиться играть на деньги одному против мужа и жены, которые играют ничуть не хуже меня. Кто-то из них может даже не специально, а просто неосознанно подогрыть супругу(е).

(12) За комп есть неплохой вариант http://www.playmarriage.com
Но мозги и вправду тренировать надо :-)
15. vip 10.07.09 15:31 Сейчас в теме
(14) Ну, на фуфло или "на просто так" играть гораздо опасней.
16. Altair777 644 10.07.09 15:42 Сейчас в теме
(15) Я писал в (10) что это хорошие знакомые. Так вот, друзей проще потерять когда возникают денежные отношения. Особенно, если денег нет. А тогда время было не очень простое.

Ёпрст, лучше посмотри код и подскажи, что там еще можно оптимизировать.
Если можно :-)
Была еще мысль обойтись не 3 ячейками в таблице, а 2 и менять ориентацию текста. Но стоит ли?
17. Ёпрст 1063 10.07.09 16:15 Сейчас в теме
(16) в пятницу ?! Ты поди издеваешься.. ща все мысле только о бане.. и как я в неё попаду в ближайшее время :)
18. Altair777 644 10.07.09 16:21 Сейчас в теме
(17) У тебя все равно уже сериал "Один дома" закончился, раньше надо было попадать :-)
Ладно... потом....
9. Ёпрст 1063 10.07.09 14:43 Сейчас в теме
(7) напиши игру за комп.. вот где затыка..
2. Neo. 09.07.09 23:18 Сейчас в теме
Лучше шахматы реализуйте по сети.
5. Ёпрст 1063 10.07.09 13:59 Сейчас в теме
12. Ёпрст 1063 10.07.09 15:13 Сейчас в теме
+11 мозгов при написании робота.
19. AlexO 135 23.06.12 15:22 Сейчас в теме
А где "Сборник обработок" сам?
20. Altair777 644 23.06.12 15:35 Сейчас в теме
(19) AlexO, их пока 2 :)
Сборник - это сама публикация. А обработки - в файлах.
21. SERJ_1CC 49 17.07.12 09:42 Сейчас в теме
Что только не придумывают, это говорит только о том, что людям нечем заняться на работе, вот и начинают придумывать чем занять себя...
22. Altair777 644 17.07.12 10:21 Сейчас в теме
(21) SERJ_1CC, интересно, а что же Вы такое придумали?
Оставьте свое сообщение