Говорящий кот

0. 66 21.11.22 12:10 Сейчас в теме
Расширение заменяет стандартную анимацию при построении отчета на анимированного кота, который "говорит" рандомные фразы.

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

Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. v8_088 22.11.22 12:34 Сейчас в теме
Дальнейшее сопровождение решения в виде апдейтов фраз предполагается ?
user811769; maksa2005; Lemmonbri; +3 Ответить
2. mrSallivan 66 22.11.22 12:43 Сейчас в теме
(1) Если будет острый интерес - можно сделать.
Код открыт, можно самостоятельно заменять фразы или добавлять их количество...
user990914; mrChOP93; +2 Ответить
3. svezr 5 23.11.22 23:06 Сейчас в теме
Можно добавить справочник фраз создать)
WhiteOwl; d_sdr; +2 Ответить
4. PrinzOfMunchen 83 24.11.22 05:54 Сейчас в теме
(3) Нужно прикрутить апи с сайта "fucking-great-advice.ru/". А если нет - сделать его)
WhiteOwl; ixijixi; Petr54-ru; megaauto; evvakra; +5 Ответить
6. mrSallivan 66 24.11.22 13:46 Сейчас в теме
7. mrSallivan 66 25.11.22 14:40 Сейчас в теме
(4) c API сайта разобрался, там все просто. Но что-то не уверен, что такой кот понравится обширной аудитории. Уж слишком там агрессивная подача советов.
WhiteOwl; JohnyDeath; +2 Ответить
8. ixijixi 1306 25.11.22 15:34 Сейчас в теме
(4)
fucking-great-advice.ru
Черт, теперь я хочу такого советчика в 1С)) Придётся сделать)
WhiteDragon; mikl79; 0x00; +3 Ответить
9. mrSallivan 66 25.11.22 16:09 Сейчас в теме
(8) я сделал, но сюда выкладывать такое опасно =) Кот стал очень говорливым
Grotgt; ixijixi; +2 Ответить
10. ixijixi 1306 25.11.22 16:13 Сейчас в теме
(9) Можете в личку прислать?
5. tsatsur 36 24.11.22 07:58 Сейчас в теме
Делал как-то первоапрельскую шутку (регистр сведений с шутками откуда рандомно выводятся предупреждения пользователям с шутками).
Склеил их вместе:) Спасибо за идею.
user811769; +1 Ответить
11. Brawler 438 27.11.22 23:06 Сейчас в теме
еще бы анимация рандомно менялась было бы тоже интересно
12. ovasiliev 6 28.11.22 00:17 Сейчас в теме
Шарман! Бухи будут пищать!
13. PrinzOfMunchen 83 28.11.22 05:32 Сейчас в теме
(8) Для внутренней базы сделал) Только апи по категориям и с цензурой не работают.
14. ixijixi 1306 28.11.22 08:42 Сейчас в теме
(13) Эти API и на самом сайте не работают
15. PrinzOfMunchen 83 28.11.22 10:22 Сейчас в теме
16. RocKeR_13 1190 30.11.22 14:10 Сейчас в теме
Немного занудства: Нехорошо использовать директиву &Вместо)) Можно заимствовать только процедуру ОтчетыКлиентСервер.ОтобразитьСостояниеОтчета с директивой &После и туда перенести часть кода из основной процедуры, модифицировав ее нужным образом. Ну или с директивой &ИзменениеИКонтроль. А еще можно заимствовать общую форму ДлительнаяОперация и туда тоже кота вставить)))
30. alexey_kurdyukov 122 15.12.22 13:57 Сейчас в теме
(16) Должно произойти что-то очень серьёзно, чтобы нужно было использовать ИзменениеИКонтроль. Видимо, там меняется пара строчек в коде?
31. RocKeR_13 1190 15.12.22 14:19 Сейчас в теме
(30) Почему вы считаете, что должно было произойти что-то серьёзное?) Здесь в принципе меняется стандартное поведение и есть необходимость переопределить типовые строки. В этом случае лучше использовать ИзменениеИКонтроль. На крайний случай Вместо в паре с ПродолжитьВызов для функций.
32. alexey_kurdyukov 122 15.12.22 14:30 Сейчас в теме
(31) Вместо с ПродолжитьВызов() - это как раз простое и понятное поведение, а изменение и контроль - заплатка до первого обновления
WhiteOwl; ixijixi; +2 Ответить
33. RocKeR_13 1190 15.12.22 14:52 Сейчас в теме
(32) И снова не соглашусь. Директиву &Вместо вам нужно при каждом обновлении отслеживать вручную, а на &ИзменениеИКонтроль платформа сама обратит внимание при проверке возможности применения. Чем это грозит - тоже понятно. Самый примитивный пример: есть функция, которая формирует некоторую табличную часть; в расширении функцию переопределили с использованием ПродолжитьВызов и перезаполнили некоторую колонку. При обновлении колонку табличной части переименовали и расширение уже генерит ошибку. Второй и тоже довольно существенный недостаток: в функции есть некоторые промежуточные параметры, которые нельзя получить в возвращаемом значении, но они нужны для модификации этого возвращаемого значения; если использовать ПродолжитьВызов, то придется промежуточные данные повторно получать; а если возвращаемое значение - это некоторая коллекция, то ее потребуется повторно обходить. Ну а про процедуры и речи нет - там ПродолжитьВызов вообще может изменить весь контекст в совсем ненужное состояние.

Ну и непонятно, что сложного и непонятного в &ИзменениеИКонтроль? Там как раз видно целиком всю процедуру/функцию, что в значительно степени упрощает процесс изменения, так как не нужно сверяться, что там было изначально. А вот &Вместо - это и есть как раз заплатка, которую и использует 1С в своих патчах.
user1364468; +1 Ответить
17. mrSallivan 66 30.11.22 15:18 Сейчас в теме
(16) Можно =) На самом деле способов решения - много. Это просто расширение для поднятия настроение и там есть много вещей, которые можно было бы сделать..
По поводу ОтчетыКлиентСервер.ОтобразитьСостояниеОтчета - согласен, так как если отчет будет со своей формой - кота в моем решении не будет. А &Вместо - не думаю, что общая форма отчетов в ближайшее время сильно изменится.
18. Mallok 72 01.12.22 21:50 Сейчас в теме
Что такое, не могу скачать, пишет, что отправлено на почту, но sm не снимаются и не приходит ссылка.
19. RomanVG7 02.12.22 09:55 Сейчас в теме
Прикрутите анекдоты по API с сайта http://rzhunemogu.ru/RandJSON.aspx
maksa2005; JohnyDeath; +2 Ответить
20. mrSallivan 66 03.12.22 15:58 Сейчас в теме
(19) интересная идея, можно подумать =)
22. mrSallivan 66 04.12.22 10:51 Сейчас в теме
21. mrSallivan 66 04.12.22 10:50 Сейчас в теме
Добавил вариант с анекдотами
RomanVG7; +1 Ответить
23. krikmarin 1 06.12.22 04:02 Сейчас в теме
П.с.: "Прикрутил "Кота" к своей 1С БП 3. Его просто не видно ввиду того что любые отчеты делаются меньше секунды".
24. mrSallivan 66 06.12.22 10:31 Сейчас в теме
25. krikmarin 1 07.12.22 07:08 Сейчас в теме
(24) ОСВ тоже формируется довольно быстро не зависимо от выбранного периода (кот не успевает появиться).
26. mrSallivan 66 08.12.22 19:17 Сейчас в теме
(25) если база небольшая - возможно.. ну в таком случае и стандартная анимация не покажется =)
27. brunet 46 10.12.22 21:26 Сейчас в теме
Тогда анекдоты от работы бухгалтера будут отвлекать
28. Andrew_flyer 84 14.12.22 02:27 Сейчас в теме
Добавил расширение, чёт не взлетело. В чём может быть дело?
Прикрепленные файлы:
29. mrSallivan 66 14.12.22 05:11 Сейчас в теме
(28) изначально расширение сделано под УТ11.5
В бухгалтерии возможны нюансы, так как в ней модули отличаются.
34. Kontakt 107 20.12.22 14:25 Сейчас в теме
Пришлите код обращение к api. Добавлю себе.
35. mrSallivan 66 21.12.22 12:18 Сейчас в теме
(34)
Функция СуперСовет() Экспорт
СерверДляЗапроса = "rzhunemogu.ru";
	ТекстДляЗапроса = "RandJSON.aspx";	
	
	HTTPСоединение = Новый HTTPСоединение(СерверДляЗапроса, 80);     
	HTTPЗапрос = Новый HTTPЗапрос(ТекстДляЗапроса); 
	Попытка
		Результат =  HTTPСоединение.Получить(HTTPЗапрос); 
		Тело = Результат.ПолучитьТелоКакСтроку();
	Исключение
		Сообщить("Произошла сетевая ошибка!");
		ВызватьИсключение;
	КонецПопытки;
	
	ЧтениеJSON = Новый ЧтениеJSON;
	ЧтениеJSON.УстановитьСтроку(Тело);  		
	Данные = ПрочитатьJSON(ЧтениеJSON);
	Текст = Данные.content;
	Возврат Текст;
КонецФункции
Показать
36. burgomister 52 03.01.23 16:18 Сейчас в теме
Функция СгенерироватьФразуКота() Экспорт
	
	МассивФраз = ВернутьМассивФраз();
	Генератор  = ...
	НомерФразы = ...
	
	Возврат МассивФраз[НомерФразы];
	
КонецФункции

Функция ВернутьМассивФраз()
	
	МассивФраз = Новый Массив;
	МассивФраз.Добавить("Чтобы помыть кота, нужно: вода, кот и йод с бинтами!");
	МассивФраз.Добавить("....");

        Возврат МассивФраз;

КонецФункции
Показать
37. KVIKS 193 24.01.23 16:40 Сейчас в теме
Можно анекдоты выводить не в строке с котом, а в оповещения в колокольчик, к примеру раз в час.
Оставьте свое сообщение
Вакансии
Руководитель группы разработки
Краснознаменск (Московская обл.)
зарплата от 180 000 руб. до 300 000 руб.
Полный день

Инженер 1С
Ессентуки
зарплата от 120 000 руб. до 144 000 руб.
Полный день

Программист 1С
Краснознаменск (Московская обл.)
зарплата от 150 000 руб. до 250 000 руб.
Полный день

Специалист техподдержки
Краснознаменск (Московская обл.)
зарплата от 50 000 руб. до 100 000 руб.
Полный день

Программист, аналитик, эксперт 1С
Санкт-Петербург
По совместительству