gifts2017

1С - теперь играет и поет! (компонента для проигрывания видео и звука)

Опубликовал developer - (developer) в раздел Программирование - Внешние компоненты

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

Всем привет!

Теперь музыку можно слушать даже не запуская медиа-проигрывателя от Билла Гейтса. Компонента воспроизводит звуки любых форматов (был бы кодек установлен). Вы можете использовать как обработки представленные в архиве, так и сами разработать интересный функцианал для вашего проигрывателя. И эта компонента Вам в этом поможет. А для тех, кто програмирует не только под 1С, будет полезно использовать маленький движок для озвучивания коротких звуковых семплов в ваших программах. Размер компоненты всего 20 кбайт. Такая маленькая штучка может даже поспорить с таким монстром как DirectX, ну правда что касается звуков и музыки.

Пробуйте, может кому понравится.

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

Наименование Файл Версия Размер
медиа проигрыватель 427
.1236470321 24,56Kb
01.01.15
427
.1236470321 24,56Kb Бесплатно

См. также

Подписаться Добавить вознаграждение

Комментарии

1. GSoft. (GSoft) 08.03.09 04:23
v7 r27 xp sp3
открыл три файла - один нет звука, один нет картинки, один -норм

правда не придумаю практическое применение
как вариант дальнейшего развития - маштабирование картинки + кнопки управления

идея +
2. Аркадий Кучер (Abadonna) 08.03.09 11:51
3. Василий Демидов (Душелов) 08.03.09 11:59
Ну наконец-то! Дождались!
4. Сhe Burashka (CheBurator) 08.03.09 12:03
не, озвучка - это правильное дело! вот у меня если бы не было возможности на терминалах звуком орать - вообще плохо было-бы...
5. Аркадий Кучер (Abadonna) 08.03.09 12:06
Чебур. Вопрос number one: ты до фига видал контор, где у юзверей колонки есть? Смею тебя уверить, что моя твою сожрет и не поперхнется, однака нема та колонок ;)
6. Сhe Burashka (CheBurator) 08.03.09 12:09
попробовал, я27, xpSP2 - видео не воспроизводит...
1USD повременим отстетгивать
PetrovichD; +1 Ответить 2
7. Василий Демидов (Душелов) 08.03.09 12:10
(5) У меня было в одной конторе лет 7 назад колонки на проходной, я компоненту писал, которая сирену проигрывала на этих колонках, когда несанкционированный проход был зафиксирован :)
8. Василий Демидов (Душелов) 08.03.09 12:11
По-моему проще использовать активикс медиаплеера и не париться :)
9. Василий Демидов (Душелов) 08.03.09 12:11
(5)(6) Да и вообще, чего тут сидите? Марш 8 Марта праздновать! :)
10. Аркадий Кучер (Abadonna) 08.03.09 12:11
(6) По ссылке платить не надо (особенно тебе) Производит, блин :))))
11. Сhe Burashka (CheBurator) 08.03.09 14:21
не воспроизводит! другие прочие плейеры - играют...
12. developer - (developer) 08.03.09 17:04
В некоторых случаях компонента может молчать и не подавать признаков жизни. Это не от того что у нее проблема, а от того что она не предусматривает подключение внешних кодеков. Решение простое. Нужно установить кодек, который будет в системе по умолчанию. Тогда компонента его подхватит. У кого не работает компонента, установите подходящий кодек и всего делов.
13. Сhe Burashka (CheBurator) 08.03.09 21:47
приведите рецепт как установить "кодек по умолчанию"
14. developer - (developer) 09.03.09 00:10
эту операцию сделать можно, но рискованно. В диспетчере устройств найдите ветку "Звуковые, видео и игровые устройства". Далее "Видео кодеки". В диалоге свойств удалите весь мусор и оставьте только те, которые будут использоваться как основные. Вообщето, такие заморочки не требуются, если найти более подходящий кодек, который будет соответствовать формату вашего видео файла.
Проблема в том, что некоторые проигрыватели, при установке на компьютер, так же ставят и кодеки, но они работают только с этим проигрывателем. Проверить такие кодеки можно так: попробуйте открыть видео файл простым видео проигрывателем "Windows media player" и если он будет проигрываться, значит и компонента его тоже потянет.
Удачи!
15. Сhe Burashka (CheBurator) 09.03.09 04:17
хм.. заиграло! из того что делал (что могло оказать влияние) - просмотр кодеков на закладке свойств... все... шаманство какое-то...
.
на всякий случай: при ПодключитьВнешнююКомпоненту дает
Ошибка при создании объекта из компоненты <Неизвестная компонента> (отсутствует CLSID)
.
нельзя делать
НачКаталог = ФС.ТекКаталог()
! в результате минут 5 убил чтоб понять почему это черный блямб размером полтора на полсантиметра на месте надписи "видеофайл" и внем крутится кино...
надо делать
лПутьОбработки ="";
РасположениеФайла(лПутьОбработки,);
и открывать форму по этому пути!!!
.
иначе форма "видео" не открывается и начинает воспроизводится хз где...
16. Сhe Burashka (CheBurator) 09.03.09 04:23
с пропорциями тоже немного неувязочка.. но +1 несомненно
17. developer - (developer) 10.03.09 01:34
да, чудес на свете не бывает, но верить в них нужно :)
если окно-цель где будет воспроизводиться видео не идентифицировано, картинка появится в своем окне, без привязки.
и еще, компонента разработана не в среде 1С, поэтому не подключайте ее как "ПодключитьВнешнююКомпоненту". Делайте или "СоздатьОбъект" - если 7.7 или "Новый ComОбъект" если для 8.x, ну дальше вы уже знаете.

ПС - да, если кого заинтересует компонента для синтезирования речи под 1С, тоже могу подкинуть - бесплатно :)) Работает под голосовой движок "Дигало". Для справки - голосовые движки используются для синтезирования текста в речь. Можно например документацию читать с текстового файла, или другую текстовую информацию выводить в человеческий голос. Если нужно например в программе взвучить много текстовой информации, то лучше подойдет именно синтезатор речи, потому как звуковых семплов нужно очень много.

18. Олег Пономаренко (O-Planet) 10.03.09 02:05
(17) Дигало говорит, как пьяный робот Вертер, которого отымел Весельчак У
19. developer - (developer) 10.03.09 02:35
(18) Согласен, мужик картавый. Ну можно и Катерину, но весом она трошки более. Зато более приятный голос.
20. Nickolay Shilkow (shilkownickolay) 12.03.09 07:00
а где обещанная обработка для 1с8.*? в архиве только обработки для 1с77
21. n_rostova (rostova.it@gmail.com) 12.03.09 09:00
+1 к предыдущему сообщению. Демо для 7.7. А без него ниче не понятно!!!
22. Maxim Goncharov (maxx) 13.03.09 10:14
Что-то на восьмерке не получается, пишу в восьмерке

МикроМедиа = Новый("МикроМедиа.Плеер");

выдаёт ошибку: "Тип не определен"

но на 7.7 демо обработки работают.
23. developer - (developer) 13.03.09 12:59
(22) немного не точно, пишите МикроМедиа = Новый ComОбъект("МикроМедиа.Плеер")
удачи!
24. Maxim Goncharov (maxx) 13.03.09 13:08
25. Алексей (alsoftik) 13.07.10 07:40
Спасибо! Вот только функции установки позиции не хватает, чтобы можно было сделать
полноценный проигрыватель.
26. Александр Зайцев (AlecoZAV) 23.09.11 14:40
27. F L (fierylions) 26.03.13 12:41
(26) AlecoZAV, а что на уф не будет работать ?
28. Александр Зайцев (AlecoZAV) 26.03.13 12:56
(27) fierylions, если хорошенько подумать и допилить - то почему бы и нет. вы на год поста обратите внимание))
29. koder (bashhhh) 12.03.15 22:04
Спасибо! Как раз искал такую!
Для написания сообщения необходимо авторизоваться
Прикрепить файл
Дополнительные параметры ответа