Как воспроизвести звуковой сигнал или проиграть звуковой файл в 1С? Частенько бывает, что нужно оповестить или обратить внимание пользователя на оповещение звуком, вот несколько решений:
Стандартный вариант:
Синтаксис: Сигнал()
Описание: Воспроизводит звуковой сигнал. Устройство, воспроизводящее звук, а также характер звукового сигнала зависят от программно-аппаратного состава компьютера и звуковых установок ОС.
Недоступен на сервере 1С:Предприятие. Не используется в модуле внешнего соединения.
Код 1C v 8.3 &НаКлиенте
Процедура Команда(Команда)
Сигнал();
КонецПроцедуры
С использованием внешних компонент:
Код 1C v 8.х // Способ №1
файлз = "C:\1.wav";
Скрипт = Новый COMОбъект("MSScriptControl.ScriptControl");
Скрипт.Language="vbscript";
Скрипт.AddCode("
|Function Main()
|Set oVoice = CreateObject(""SAPI.SpVoice"")
|set oSpFileStream = CreateObject(""SAPI.SpFileStream"")
|oSpFileStream.Open """+файлз+"""
|oVoice.SpeakStream oSpFileStream
|End Function");
Скрипт.Run("Main");
// Способ №2
файлз = "C:\1.wav";
oVoice = Новый COMObject("SAPI.SpVoice");
oSpFileStream = Новый COMObject("SAPI.SpFileStream");
oSpFileStream.Open(файлз);
oVoice.SpeakStream(oSpFileStream);
oSpFileStream.Close();
// Способ №3
файлз = "C:\1.wav";
DynamicWrapper = Новый COMОбъект("DynamicWrapperX");
DynamicWrapper.Register("winmm.dll", "sndPlaySoundA", "i=su");
DynamicWrapper.sndPlaySoundA(файлз, 1);
// Способ №4
// Проигрыватель - это ActiveX компонента "Windows Media Player "
Процедура КнопкаВыполнитьНажатие(Кнопка)
ПроигратьЗвук("D:\Звуки\123.wav");
КонецПроцедуры
Процедура ПроигратьЗвук(Путь)
Попытка
ЭлементыФормы.Проигрыватель.settings.autostart = Истина;
ЭлементыФормы.Проигрыватель.settings.volume = 100;
ЭлементыФормы.Проигрыватель.URL = Путь;
Исключение
КонецПопытки;
КонецПроцедуры
// Способ №5
// при помощи html-тега bgsound, на форме должен быть элемент Поле HTML документа
&НаКлиенте
Процедура ВоспроизвестиMP3()
мФайл = ПолучитьАдресФайла();
ПолеHTML = "
| <HTML>
| <BODY scroll='no'>
| <BGSOUND id='sound_think' balance=0 volume='-1000'></BGSOUND>
| <div id=paperRaphael></div>
| <script>
| function PlaySound() {
| if (!window.HTMLAudioElement) {
| document.all.sound_think.volume=0;
| document.all.sound_think.src = '"+мФайл+"';
| }
| }
| window.onload = function(){
| PlaySound();
| }
| </script>
| </BODY>
| </HTML>";
КонецПроцедуры
&НаСервере
Функция ПолучитьАдресФайла()
Возврат ПоместитьВоВременноеХранилище(Обработки.ЗвукВ1С.ПолучитьМакет("sound"));
КонецФункции
Категория:
Полезные, Универсальные Функции Курс по Мобильной платформе 1С (Вадим Сайфутдинов) Курс по разработке мобильного приложения на мобильной платформе 1С:Предприятие, из которого Вы узнаете:
1. Как установить мобильную платформу 1с на мобильное устройство (телефон, планшет и т.д).
2. Научитесь создавать простую конфигурацию 1c для мобильного устройства.
3. 65 минут видео, разбитых на короткие и структурированные видео уроки.
4. Видео сопровождается текстовой информацией с картинками (если так вам удобнее изучать).
5. Без «воды», только полезная информация.
6. Предоставим все необходимые материалы для обучения.
1. Мобильная платформа 1С предприятие. Введение
VIDEO 2. Установка веб сервера Apache
VIDEO 3. Установка виртуальной машины VMware-player с Андройдом, установка мобильной платформы 1С
VIDEO 4. Разработка простого мобильного приложения на 1С, динамическое обновление
VIDEO 5. Демонстрация установки мобильной платформы 1С на смартфон LG
VIDEO 6. Варианты разработки мобильных приложений
VIDEO 7. Сборка apk файла для Android
Сборка apk файла при помощи специальной конфигурации 1С . Сборщик мобильных приложений - MobileAppMaker.
VIDEO Автор курса: Вадим Сайфутдинов http://www.work-1c.ru
Категория:
Мобильное приложение Как использовать элементы управления ActiveX? Для вставки в диалог формы элемента управления ActiveX необходимо воспользоваться пунктом главного меню Форма Вставить ActiveX...
В открывшемся диалоге выбора отметим нужный нам объект, например Microsoft Media
Player (для прослушивания музыкальных файлов, воспроизведения видеофайлов).
Определим имя элемента управления: WMP.
Кроме этого разместим в диалоге кнопку, при нажатии на которую будет вызываться обработчик события, содержащий приведенный ниже текст:
Код 1C v 8.х
Режим = РежимДиалогаВыбораФайла.Открытие;
ДиалогВыбораФайла = Новый ДиалогВыбораФайла(Режим);
ДиалогВыбораФайла.Фильтр = "Все файлы (все)|*.*";
ДиалогВыбораФайла.Заголовок = "Выберите медиафайл";
Если ДиалогВыбораФайла.Выбрать() Тогда
ПутьКМедиаФайлу = ДиалогВыбораФайла.ПолноеИмяФайла;
// В зависимости от варианта объекта запись полного пути к файлу производится либо в свойство FileName, либо в свойство URL.
Попытка
ЭлементыФормы.WMP.FileName = ПутьКМедиаФайлу;
Исключение
ЭлементыФормы.WMP.URL = ПутьКМедиаФайлу;
КонецПопытки;
КонецЕсли;
В указанной процедуре большинство строк кода работают с объектом ДиалогВыбораФайла, позволяющим организовывать удобный диалог выбора файла.
Запуск выбранного файла производится кнопкой Воспроизведение/Play элемента управления WMP.
Категория:
OLE, ActiveX