PlaySound("Bienen.wav",NULL,SND_FILENAME|SND_SYNC);
PlaySound("Door.wav",NULL,SND_FILENAME|SND_SYNC);
Wav в Builder
Вот такая проблема.
У меня есть несколько коротких Wav файлов.
Мне нцжно программа которая открыл по очереди эти файлы.
Как мне это делать.
У меня есть один вариант.
Я делаю с помощью TMediaPlayer но не могу делать так что они открылись по очереди(т.е. только тогда открыть другой файл когда закончилось предыдущий файл),
я делаю так
TMediaPlayer1->Open();
TMediaPlayer1->FileName="C:\\1.wav";
TMediaPlayer1->Play();
TMediaPlayer1->FileName="C:\\2.wav";
TMediaPlayer1->Play();
Моментально открывает первый файл и закрывает первый, открывает второй
Как делать так чтобы открылись по очереди 1 и потом 2.
Не обьязательно с помощью MediaPlayer.
Заранее Спасибо.
У меня есть несколько коротких Wav файлов.
Мне нцжно программа которая открыл по очереди эти файлы.
Как мне это делать.
У меня есть один вариант.
Я делаю с помощью TMediaPlayer но не могу делать так что они открылись по очереди(т.е. только тогда открыть другой файл когда закончилось предыдущий файл),
я делаю так
TMediaPlayer1->Open();
TMediaPlayer1->FileName="C:\\1.wav";
TMediaPlayer1->Play();
TMediaPlayer1->FileName="C:\\2.wav";
TMediaPlayer1->Play();
Моментально открывает первый файл и закрывает первый, открывает второй
Как делать так чтобы открылись по очереди 1 и потом 2.
Не обьязательно с помощью MediaPlayer.
Заранее Спасибо.
Цитата:
Originally posted by Pochemuchka
Вот такая проблема.
У меня есть несколько коротких Wav файлов.
Мне нцжно программа которая открыл по очереди эти файлы.
Как мне это делать.
У меня есть один вариант.
Я делаю с помощью TMediaPlayer но не могу делать так что они открылись по очереди(т.е. только тогда открыть другой файл когда закончилось предыдущий файл),
я делаю так
TMediaPlayer1->Open();
TMediaPlayer1->FileName="C:\\1.wav";
TMediaPlayer1->Play();
TMediaPlayer1->FileName="C:\\2.wav";
TMediaPlayer1->Play();
Моментально открывает первый файл и закрывает первый, открывает второй
Как делать так чтобы открылись по очереди 1 и потом 2.
Не обьязательно с помощью MediaPlayer.
Заранее Спасибо.
Вот такая проблема.
У меня есть несколько коротких Wav файлов.
Мне нцжно программа которая открыл по очереди эти файлы.
Как мне это делать.
У меня есть один вариант.
Я делаю с помощью TMediaPlayer но не могу делать так что они открылись по очереди(т.е. только тогда открыть другой файл когда закончилось предыдущий файл),
я делаю так
TMediaPlayer1->Open();
TMediaPlayer1->FileName="C:\\1.wav";
TMediaPlayer1->Play();
TMediaPlayer1->FileName="C:\\2.wav";
TMediaPlayer1->Play();
Моментально открывает первый файл и закрывает первый, открывает второй
Как делать так чтобы открылись по очереди 1 и потом 2.
Не обьязательно с помощью MediaPlayer.
Заранее Спасибо.
Попробуй вот так:
TMediaPlayer1->Open();
TMediaPlayer1->FileName="C:\\1.wav";
TMediaPlayer2->Open();
TMediaPlayer2->FileName="C:\\2.wav";
TMediaPlayer1->Play();
TMediaPlayer2->Play();
Цитата:
Originally posted by Pochemuchka
Вот такая проблема.
У меня есть несколько коротких Wav файлов.
Мне нцжно программа которая открыл по очереди эти файлы.
Как мне это делать.
У меня есть один вариант.
Я делаю с помощью TMediaPlayer но не могу делать так что они открылись по очереди(т.е. только тогда открыть другой файл когда закончилось предыдущий файл),
я делаю так
TMediaPlayer1->Open();
TMediaPlayer1->FileName="C:\\1.wav";
TMediaPlayer1->Play();
TMediaPlayer1->FileName="C:\\2.wav";
TMediaPlayer1->Play();
Моментально открывает первый файл и закрывает первый, открывает второй
Как делать так чтобы открылись по очереди 1 и потом 2.
Не обьязательно с помощью MediaPlayer.
Заранее Спасибо.
Вот такая проблема.
У меня есть несколько коротких Wav файлов.
Мне нцжно программа которая открыл по очереди эти файлы.
Как мне это делать.
У меня есть один вариант.
Я делаю с помощью TMediaPlayer но не могу делать так что они открылись по очереди(т.е. только тогда открыть другой файл когда закончилось предыдущий файл),
я делаю так
TMediaPlayer1->Open();
TMediaPlayer1->FileName="C:\\1.wav";
TMediaPlayer1->Play();
TMediaPlayer1->FileName="C:\\2.wav";
TMediaPlayer1->Play();
Моментально открывает первый файл и закрывает первый, открывает второй
Как делать так чтобы открылись по очереди 1 и потом 2.
Не обьязательно с помощью MediaPlayer.
Заранее Спасибо.
Есть такая ф-ция:
PlaySound(FileName.c_str(), NULL, SND_FILENAME)
Не указывай в последнем параметре SND_ASYNC.
Цитата:
Originally posted by Pochemuchka
Вот такая проблема.
У меня есть несколько коротких Wav файлов.
Мне нцжно программа которая открыл по очереди эти файлы.
Как мне это делать.
У меня есть один вариант.
Я делаю с помощью TMediaPlayer но не могу делать так что они открылись по очереди(т.е. только тогда открыть другой файл когда закончилось предыдущий файл),
я делаю так
TMediaPlayer1->Open();
TMediaPlayer1->FileName="C:\\1.wav";
TMediaPlayer1->Play();
TMediaPlayer1->FileName="C:\\2.wav";
TMediaPlayer1->Play();
Моментально открывает первый файл и закрывает первый, открывает второй
Как делать так чтобы открылись по очереди 1 и потом 2.
Не обьязательно с помощью MediaPlayer.
Заранее Спасибо.
Вот такая проблема.
У меня есть несколько коротких Wav файлов.
Мне нцжно программа которая открыл по очереди эти файлы.
Как мне это делать.
У меня есть один вариант.
Я делаю с помощью TMediaPlayer но не могу делать так что они открылись по очереди(т.е. только тогда открыть другой файл когда закончилось предыдущий файл),
я делаю так
TMediaPlayer1->Open();
TMediaPlayer1->FileName="C:\\1.wav";
TMediaPlayer1->Play();
TMediaPlayer1->FileName="C:\\2.wav";
TMediaPlayer1->Play();
Моментально открывает первый файл и закрывает первый, открывает второй
Как делать так чтобы открылись по очереди 1 и потом 2.
Не обьязательно с помощью MediaPlayer.
Заранее Спасибо.
См. TMediaPlayer->OnNotify+TMediaPlayer->Mode
Цитата:
Originally posted by GIZMO
См. TMediaPlayer->OnNotify+TMediaPlayer->Mode
См. TMediaPlayer->OnNotify+TMediaPlayer->Mode
Я попробовал все варианты но у меня не получилось то что хочу.
Как работает ВИНАМП ?
Когда заканчивается файл открывается другой верно ?
Так я хочу создать программу в которм мне нужен этот момент.
TMediaPlayer1->OnNotify меня заинтересовал но я не понял правда говоря.
Можно делать и так например у меня 5 файлов. Эти 5 файлы могу я программно создать как один файл и надать на ПЛЕЙ. И будет то что хочу. Кто знает как это делаь.
Пожайлуста если у вас есть ответ если не трудно напишите сразу пример на 1,2,3,4,5 .wav-ах.....
Спасибо.
PlaySound не могу использовать ...Где надо писать имя файла ?
SoundForge как клеит файлы. Мне нужно простой вариант этого чтобы программа делал такое
File.wav=File1.wav+File2.wav
File.wav=File1.wav+File2.wav
Код:
Так подряд будут проиграны 2 файла. Запускать это советую в отдельной нити (thread) потому, что иначе на время проигрывания программа подвисает.
А как сделать так что бы несколько файлов проигрывалось в фоновом режиме т.е вопрос сводится к тому: Как узнать когда
PlaySound("some.wav",NULL,SND_FILENAME|SND_ASYNC)
завершит прогрывание, обработать этот момент и начать играть следующий файл?
Если можно то не таким способом
wav = wav1 + wav2 +...+ wavN;
PlaySound(wav,NULL,SND_FILENAME|SND_ASYNC)
хочется какого то randomizа в проигрывании..
PlaySound("some.wav",NULL,SND_FILENAME|SND_ASYNC)
завершит прогрывание, обработать этот момент и начать играть следующий файл?
Если можно то не таким способом
wav = wav1 + wav2 +...+ wavN;
PlaySound(wav,NULL,SND_FILENAME|SND_ASYNC)
хочется какого то randomizа в проигрывании..
На то она и асинхронная, IMHO, чтоб не знать когда она закончиться.
Почитай http://www.xakep.ru//magazine/xa/057/086/1.asp . Если тебя интересует более серьезная работа со звуком.
Почитай http://www.xakep.ru//magazine/xa/057/086/1.asp . Если тебя интересует более серьезная работа со звуком.
Всё
Уже получилось. Но другим искуственным методом.
Уже получилось. Но другим искуственным методом.
Цитата:
Originally posted by Pochemuchka
TMediaPlayer1->OnNotify меня заинтересовал но я не понял правда говоря.
TMediaPlayer1->OnNotify меня заинтересовал но я не понял правда говоря.
Событие OnNotyfy происходит, когда завершается метод, скажем Open, т.е. первый wav кончил играть. Тут-то ты открываешь второй и т.д. и т.п. Не забывай только Notify класть каждый раз в true.
Есть еще один метод:
TMediaPlayer1->Open();
TMediaPlayer1->FileName="C:\\1.wav";
TMediaPlayer1->Wait = true;
TMediaPlayer1->Play();
TMediaPlayer1->FileName="C:\\2.wav";
TMediaPlayer1->Wait = true;
TMediaPlayer1->Play();
Цитата:
Originally posted by AlexandrVSmirno
Событие OnNotyfy происходит, когда завершается метод, скажем Open, т.е. первый wav кончил играть. Тут-то ты открываешь второй и т.д. и т.п. Не забывай только Notify класть каждый раз в true.
Есть еще один метод:
TMediaPlayer1->Open();
TMediaPlayer1->FileName="C:\\1.wav";
TMediaPlayer1->Wait = true;
TMediaPlayer1->Play();
TMediaPlayer1->FileName="C:\\2.wav";
TMediaPlayer1->Wait = true;
TMediaPlayer1->Play();
Событие OnNotyfy происходит, когда завершается метод, скажем Open, т.е. первый wav кончил играть. Тут-то ты открываешь второй и т.д. и т.п. Не забывай только Notify класть каждый раз в true.
Есть еще один метод:
TMediaPlayer1->Open();
TMediaPlayer1->FileName="C:\\1.wav";
TMediaPlayer1->Wait = true;
TMediaPlayer1->Play();
TMediaPlayer1->FileName="C:\\2.wav";
TMediaPlayer1->Wait = true;
TMediaPlayer1->Play();
Poluchilos no na slabom kompe ne xorosho proznositsa, est'pauza sredi nix, a file-i ochen korotkie u menya.
Ya xochu delat tak chto odin file bil zakreplen v drugoy file i etot file soxranilsa pod drugim imenem, kak mojno delat' eto
Da i chto delaet knopka Record v MediaPlayer-e...mojet eto to chego ya xochu ili zapisivaet golos s microfona ?
Kak rabotaet eto MediaPlayer1->Record() ?????
tak ne poluchaetsa
Neujeli nikto ne znayet ?
Kak mne neskolko file-ov zapisat' kak odin file ??
Kak mne neskolko file-ov zapisat' kak odin file ??
Цитата:
Originally posted by Pochemuchka
Neujeli nikto ne znayet ?
Kak mne neskolko file-ov zapisat' kak odin file ??
Neujeli nikto ne znayet ?
Kak mne neskolko file-ov zapisat' kak odin file ??
Ну почему, если знать алгоритм ЦАП-АЦП, то в общем-то проблем нет...:D останется только применить обыкновенную конкатенацию 8)
Цитата:
Originally posted by Solomon
Ну почему, если знать алгоритм ЦАП-АЦП, то в общем-то проблем нет...:D останется только применить обыкновенную конкатенацию 8)
Ну почему, если знать алгоритм ЦАП-АЦП, то в общем-то проблем нет...:D останется только применить обыкновенную конкатенацию 8)
A ya ne znayu etot algorithm, otkuda ya mogu skachat' dokumentaciyu.
A ti znaesh ?
Цитата:
Originally posted by Pochemuchka
A ya ne znayu etot algorithm, otkuda ya mogu skachat' dokumentaciyu.
A ti znaesh ?
A ya ne znayu etot algorithm, otkuda ya mogu skachat' dokumentaciyu.
A ti znaesh ?
Судя по двум смайлам этот алгоритм очень тяжело реализуем.=) С Новым Годом!
Цитата:
Originally posted by lord Kelvin
Судя по двум смайлам этот алгоритм очень тяжело реализуем.=) С Новым Годом!
Судя по двум смайлам этот алгоритм очень тяжело реализуем.=) С Новым Годом!
Brat mne eto nujno ochen srochno
S NOVIM GODOM VSEX
no plz pomogite mne
Цитата:
Originally posted by Pochemuchka
Brat mne eto nujno ochen srochno
S NOVIM GODOM VSEX
no plz pomogite mne
Brat mne eto nujno ochen srochno
S NOVIM GODOM VSEX
no plz pomogite mne
Не извращай русский язык :devil:
Рекорд записываеться так:
Media->Open("C:\\lobzik.wav");
Media->StartRecord;
Media->Save;
И в лобзик вав будет то что ты записал ..
Проигрование двух файлов подрят лучше делать Медией из АктивХ, а чтобы сделать чтобы по очереди шли с того момента или точнее с прошлой вавки, мп и т.п. делай листвью (Кажеться он)
Цитата:
Originally posted by Noer
Не извращай русский язык :devil:
Рекорд записываеться так:
Media->Open("C:\\lobzik.wav");
Media->StartRecord;
Media->Save;
И в лобзик вав будет то что ты записал ..
Проигрование двух файлов подрят лучше делать Медией из АктивХ, а чтобы сделать чтобы по очереди шли с того момента или точнее с прошлой вавки, мп и т.п. делай листвью (Кажеться он)
Не извращай русский язык :devil:
Рекорд записываеться так:
Media->Open("C:\\lobzik.wav");
Media->StartRecord;
Media->Save;
И в лобзик вав будет то что ты записал ..
Проигрование двух файлов подрят лучше делать Медией из АктивХ, а чтобы сделать чтобы по очереди шли с того момента или точнее с прошлой вавки, мп и т.п. делай листвью (Кажеться он)
Mojesh dat' primer,
Dopustim est'tri file-a
xochu po poryadku zapisivat' eti file-i, i kak odin file zapisat'na diske ???
Mne tolko eto nado ...
Тут затрагивалась тема PlaySound(), а как сделать так что бы при проигрывании одним PlaySound'om не прирывался другой ужу проигрываемый файл?
Смысл такой:
Я проигрываяю один большой файл, и реагирую звуком на нажатия кнопок, но как только я еще раз вызываю PlaySound() то предыдущий прекращает играть, как это предотвратить?
Смысл такой:
Я проигрываяю один большой файл, и реагирую звуком на нажатия кнопок, но как только я еще раз вызываю PlaySound() то предыдущий прекращает играть, как это предотвратить?
Привет, Петрос. Посмотри ссылку http://softsearch.ru/programs/8-479-z-pack-download.shtml
и на этой страничке обрати внимание на программу
123 AudioMerger. Сам я ей не пользовался, но судя по рекламе программа позволяет склеивать wav-файлы.
Вообще, попробуй в поисковике набрать "склеить два wav в один" или какую-нибудь похожую фразу.
Должно помочь.
Удачи!
и на этой страничке обрати внимание на программу
123 AudioMerger. Сам я ей не пользовался, но судя по рекламе программа позволяет склеивать wav-файлы.
Вообще, попробуй в поисковике набрать "склеить два wav в один" или какую-нибудь похожую фразу.
Должно помочь.
Удачи!
Цитата:
Originally posted by Бешеный кролик
Привет, Петрос. Посмотри ссылку http://softsearch.ru/programs/8-479-z-pack-download.shtml
и на этой страничке обрати внимание на программу
123 AudioMerger. Сам я ей не пользовался, но судя по рекламе программа позволяет склеивать wav-файлы.
Вообще, попробуй в поисковике набрать "склеить два wav в один" или какую-нибудь похожую фразу.
Должно помочь.
Удачи!
Привет, Петрос. Посмотри ссылку http://softsearch.ru/programs/8-479-z-pack-download.shtml
и на этой страничке обрати внимание на программу
123 AudioMerger. Сам я ей не пользовался, но судя по рекламе программа позволяет склеивать wav-файлы.
Вообще, попробуй в поисковике набрать "склеить два wav в один" или какую-нибудь похожую фразу.
Должно помочь.
Удачи!
Mne ne nujna programma kotoraya delala eti funkcii.
Mne nujen kod chtobi ya dobavil eto v moem programme, i moya programma delala eti funkcii.
Ili mogu li ya sozdat' dva MediaPlayer-a
pervoe igral file-i
a vtoroy delal Record, poka ne zakonchil MediaPlayer1.
Posle chego MediaPlayer2 zapisal sozdanniy file.
pervoe igral file-i
a vtoroy delal Record, poka ne zakonchil MediaPlayer1.
Posle chego MediaPlayer2 zapisal sozdanniy file.
Neujeli net takix programistax kotorie mogut otvetit' na etot vopros.
Kak je sozdalsya Sound Forge ??
Znachit est' takaya funkcia
Kak je sozdalsya Sound Forge ??
Znachit est' takaya funkcia
Если тебе нужно возпроизвести только wav файлы, то может подойдут и wave-ф-ии.
Прилагаю статью из K+P (delphi)
Теоретически(так как не проверял) из wav-файлов можно выбрать только звуковые данные, скопировать друг за другом в память. Сделать Header и вызвать waveOutWrite(...).
Если я правильно заметил длина звуковых данных в wave файле пишется за словом data.
Прилагаю статью из K+P (delphi)
Теоретически(так как не проверял) из wav-файлов можно выбрать только звуковые данные, скопировать друг за другом в память. Сделать Header и вызвать waveOutWrite(...).
Если я правильно заметил длина звуковых данных в wave файле пишется за словом data.
Цитата:
Originally posted by Pochemuchka
Neujeli net takix programistax kotorie mogut otvetit' na etot vopros.
Kak je sozdalsya Sound Forge ??
Znachit est' takaya funkcia
Neujeli net takix programistax kotorie mogut otvetit' na etot vopros.
Kak je sozdalsya Sound Forge ??
Znachit est' takaya funkcia
Вначале писать по русски научись!
Цитата:
Originally posted by Noer
Вначале писать по русски научись!
Вначале писать по русски научись!
Ey novichok. Ya znayu chto u menya ploxo s russkim
Ti ne skaji mne chto delat'.
Ya ne russkiy !
rostyslav
Ya ne znayu Delphi.
Ya nashel etot kod no na Visual Basic.
A menya nado na C++.
U tebya est' xoroshi znaniya na etu temu ?
Ya ne znayu Delphi.
Ya nashel etot kod no na Visual Basic.
A menya nado na C++.
U tebya est' xoroshi znaniya na etu temu ?
Цитата:
Originally posted by Pochemuchka
[BU tebya est' xoroshi znaniya na etu temu ?
[BU tebya est' xoroshi znaniya na etu temu ?
не, знания на эту тему==0.
Но ради интереса проверил, что предлагал. Прилагаю код. Конечно его нужно будет изменить. Хотя бы один try-finally блок. Но если не брать во внимание, что для того, чтоб Wave файлы воспроизводились, нужно сперва вывести 3 ShowMessage, то код работает вполне нормально. :D
Думаю, нужно разобраться нормально в wav-формате, потому, что значения для Fmt я подбирал, вместо того, чтоб определить из файла.
Цитата:
Originally posted by Pochemuchka
Ey novichok. Ya znayu chto u menya ploxo s russkim
Ti ne skaji mne chto delat'.
Ya ne russkiy !
Ey novichok. Ya znayu chto u menya ploxo s russkim
Ti ne skaji mne chto delat'.
Ya ne russkiy !
Я имел ввиду русскими буквами пиши, или тоже не можешь ?
Цитата:
Originally posted by Noer
Я имел ввиду русскими буквами пиши, или тоже не можешь ?
Я имел ввиду русскими буквами пиши, или тоже не можешь ?
Завтра попробую сделать то что тебе надо ;)
Цитата:
Originally posted by Noer
Завтра попробую сделать то что тебе надо ;)
Завтра попробую сделать то что тебе надо ;)
Могу конечно.
Но для меня гораздо легче английскими буквами.
Жду ответа,
Буду благодарен если получится.