Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 29.09.2008, 22:36   #1
JRcoker
Форумчанин
 
Аватар для JRcoker
 
Регистрация: 18.07.2008
Сообщений: 119
По умолчанию mp3 в исполняемый файл

Как добавить mp3(можно wav или wma смотря что проще но желательно mp3) файл в исполняемый файл и каким кодом его потом проиграть?..
Улыбайся...Люди любят идиотов...
JRcoker вне форума Ответить с цитированием
Старый 29.09.2008, 23:26   #2
eoln
Старожил
 
Аватар для eoln
 
Регистрация: 26.04.2008
Сообщений: 2,689
По умолчанию

Поиск по форуму
http://programmersforum.ru/showthread.php?t=25895
http://programmersforum.ru/showthread.php?t=21387
http://programmersforum.ru/showthread.php?t=19271
http://programmersforum.ru/showthread.php?t=17774
eoln вне форума Ответить с цитированием
Старый 29.09.2008, 23:42   #3
Terran
Участник клуба
 
Аватар для Terran
 
Регистрация: 28.11.2007
Сообщений: 1,521
По умолчанию

Есть набор LMD компонентов в котором есть компонент LMDWaveComp. Вам достаточно только выбрать в нём .wav файл и приписать пару строчек кода и всё. При компиляции wav файл будет в ехе файле. Это самый простой вариант, НО от wav файлов вес программы значительно увеличится, а если использовать .mp3, то вам нужно вручную его в ресурсы запихивать. Подробную информацию о том, как запихнуть mp3 в ресурсы вы можете узнать воспользовавшись поиском по форуму.
Всегда рад помочь!
Terran вне форума Ответить с цитированием
Старый 01.10.2008, 13:26   #4
JRcoker
Форумчанин
 
Аватар для JRcoker
 
Регистрация: 18.07.2008
Сообщений: 119
По умолчанию

И каким кодом его воспроизводить?
Улыбайся...Люди любят идиотов...
JRcoker вне форума Ответить с цитированием
Старый 01.10.2008, 13:30   #5
JRcoker
Форумчанин
 
Аватар для JRcoker
 
Регистрация: 18.07.2008
Сообщений: 119
По умолчанию

Извеняюсь я всё вкурил....))))Тему можно закрывать спасибо....
Улыбайся...Люди любят идиотов...
JRcoker вне форума Ответить с цитированием
Старый 01.10.2008, 14:42   #6
JTG
я получил эту роль
Старожил
 
Аватар для JTG
 
Регистрация: 25.05.2007
Сообщений: 3,694
Лампочка

Так, вот короче подробная инструкция (на будущее, так сказать)

Если нужно проиграть mp3 через PlaySound:

Качаем вот эту чудесную софтину (если у кого ещё нет), бесплатная, опен-сорс
http://www.afterdawn.com/software/au...ctors/cdex.cfm

и делаем финт ушами


В диалоге выбирам нужный mp3 -> convert -> получаем wav-файл того же размера, что и исходный мп3, но "родного" майкрософтовского riff-wave формата, фактически "mp3-в-wav"

Его можно воспроизвести:
1. Из ресурсов


С помощью стандартного brcc32:
Создать текстовый файл sounds.txt с содержимиым
Цитата:
SOUND1 WAVE c:\1.wav,
SOUND2 WAVE c:\2.wav
...
перетащить на значёк brcc32 (расположен в "папка_с_делфи\bin"), получим sounds.res.
(Restorator НЕ ПОДХОДИТ!, он выдаёт какие-то странные файлы, слинковав их с прогой звук не будет воспроизводиться!)

В проге пишем:
Код:
    //где-нить в Interface или в самом *.dpr
    {$R sounds.res}
...
    //И, где нужно:
    PlaySound('SOUND1', HInstance, SND_RESOURCE + SND_ASYNC); 
    //SND_ASYNC, SND_LOOP и т.п. флаги смотрим в MSDN или в хелпе
2. Просто из файла


Код:
    PlaySound('C:\1.wav', 0, SND_FILENAME + SND_ASYNC);
пыщь

Последний раз редактировалось JTG; 01.10.2008 в 14:44.
JTG вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Не удается создать исполняемый файл chups Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 6 15.07.2008 21:07
Внедрение звука WAW/MP3 в файл GAGARIN-NEW Мультимедиа в Delphi 26 02.04.2008 13:52
Как открыть и сохранить mp3 файл в delphi? Rahim1993 Мультимедиа в Delphi 2 03.01.2008 12:55
MediaPlayer - как сделать последовательное воспроизведение mp3 файлов (именно mp3) Kashp Компоненты Delphi 13 28.09.2007 08:38