с6.3 abc Как воспроизвести в кларион звук.файл

Clarion, Clarion 7

Модератор: Дед Пахом

Правила форума
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
talgat55
Ветеран
Сообщения: 307
Зарегистрирован: 11 Сентябрь 2008, 12:53
Благодарил (а): 2 раза

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение talgat55 »

Есть звуковые файлы- нужно воспроизвести - как ?
Yufil
Ветеран движения
Сообщения: 1277
Зарегистрирован: 16 Май 2006, 14:34
Контактная информация:

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение Yufil »

Поищи в форуме по ключевому слову MCISendString ...
Аватара пользователя
Admin
Администратор
Сообщения: 3959
Зарегистрирован: 05 Июль 2005, 15:59
Откуда: Хабаровск
Благодарил (а): 25 раз
Поблагодарили: 22 раза
Контактная информация:

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение Admin »

А разве не sndPlaySound?
Рай совершает ошибки ничуть не реже чем ад. Просто у него хорошая пресса
kreator
✯ Ветеран ✯
Сообщения: 4960
Зарегистрирован: 28 Май 2009, 15:54
Откуда: Москва
Благодарил (а): 6 раз
Поблагодарили: 19 раз

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение kreator »

Admin писал(а): 18 Июль 2017, 0:37 А разве не sndPlaySound?
MCISendString имеет более расширенный функционал. Если не сказать - сильно расширенный.
Вот здесь много чего - viewtopic.php?f=12&t=3640.
We are hard at work… for you. :)
Аватара пользователя
Admin
Администратор
Сообщения: 3959
Зарегистрирован: 05 Июль 2005, 15:59
Откуда: Хабаровск
Благодарил (а): 25 раз
Поблагодарили: 22 раза
Контактная информация:

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение Admin »

kreator писал(а): 18 Июль 2017, 7:15MCISendString
Я просто что то думал что он только мидюки играет. OK
Рай совершает ошибки ничуть не реже чем ад. Просто у него хорошая пресса
talgat55
Ветеран
Сообщения: 307
Зарегистрирован: 11 Сентябрь 2008, 12:53
Благодарил (а): 2 раза

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение talgat55 »

что-то сделал - ошибок нет но молчит собака
В проекте в global запихал описание api после inside the global map
Module('windows api')
mciGetErrorString(ULONG,*CSTRING,USHORT),SHORT,PASCAL,RAW,PROC,NAME('mciGetErrorStringA')
mciSendString(*CSTRING,*CSTRING,USHORT,USHORT),ULONG,PASCAL,RAW,PROC,NAME('mciSendStringA')
End

На buton повесил исполнение
MCICommand= 'Play sound'

MCISendString(MCICommand,MCIReturn,128,0)
MESSAGE(MCIReturn)

???
Аватара пользователя
Дед Пахом
Старичок
Сообщения: 3131
Зарегистрирован: 07 Июль 2005, 16:51
Откуда: Москва, Россия
Благодарил (а): 10 раз
Поблагодарили: 28 раз
Контактная информация:

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение Дед Пахом »

Тут примеры есть: http://free-basic.ru/mcisendstring.html
С уважением, ДП
talgat55
Ветеран
Сообщения: 307
Зарегистрирован: 11 Сентябрь 2008, 12:53
Благодарил (а): 2 раза

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение talgat55 »

явно не на кларе...
Аватара пользователя
Дед Пахом
Старичок
Сообщения: 3131
Зарегистрирован: 07 Июль 2005, 16:51
Откуда: Москва, Россия
Благодарил (а): 10 раз
Поблагодарили: 28 раз
Контактная информация:

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение Дед Пахом »

тяжёлый случай
С уважением, ДП
Аватара пользователя
vic7tar
Ветеран
Сообщения: 365
Зарегистрирован: 09 Февраль 2017, 20:12

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение vic7tar »

Дед Пахом упомянул FB. Я на него нечаянно наткнулся год назад. Отличная штука, у них там даже есть 64-битный компилятор.
C10, Win10x64
Yufil
Ветеран движения
Сообщения: 1277
Зарегистрирован: 16 Май 2006, 14:34
Контактная информация:

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение Yufil »

Дык, сначала открыть файл надо, а уже потом играть ... В топике viewtopic.php?f=12&t=3640 - куча примеров...

Код: Выделить всё

      MCICommand='open "'&soundfile&'" alias sound'
      MCISendString(MCICommand,MCIReturn,128,0{Prop:Handle})
      MCICommand='play sound'
      MCISendString(MCICommand,MCIReturn,128,0{Prop:Handle})
Последний раз редактировалось Yufil 18 Июль 2017, 14:13, всего редактировалось 1 раз.
talgat55
Ветеран
Сообщения: 307
Зарегистрирован: 11 Сентябрь 2008, 12:53
Благодарил (а): 2 раза

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение talgat55 »

в переменную soundfile - указываю предварительно сам файл типа soundfile='plyyyy.mp3' так ?
Yufil
Ветеран движения
Сообщения: 1277
Зарегистрирован: 16 Май 2006, 14:34
Контактная информация:

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение Yufil »

Наверное, можно ещё и path к нему присобачить...
kreator
✯ Ветеран ✯
Сообщения: 4960
Зарегистрирован: 28 Май 2009, 15:54
Откуда: Москва
Благодарил (а): 6 раз
Поблагодарили: 19 раз

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение kreator »

Ну вот здесь - viewtopic.php?p=26293#p26293 совсем всё разжёвано мной. Только без обработки видеофайлов.
We are hard at work… for you. :)
talgat55
Ветеран
Сообщения: 307
Зарегистрирован: 11 Сентябрь 2008, 12:53
Благодарил (а): 2 раза

с6.3 abc Как воспроизвести в кларион звук.файл

Сообщение talgat55 »

не воспроизводит звуки все равно...
Ответить