Встроить звук в проект Lazrus

[files32]

Вопрос. Как встроить звук в проект LAZARUS, чтобы можно было его проиграть кроссплатформено. Может компонент какой есть? Как TImage берет картинку из свойства Picture.

[Sharfik]

http://www.freepascal.ru/forum/viewtopi ... =32&t=4135

[files32]

Это все не то. Не кроссплатформенное и играет не встроеный звук.

[Sharfik]

Простите любезный, не подумал что решение надо для ленивых...
https://wiki.freepascal.org/Play_Sound_Multiplatform

[files32]

Простите любезный, не подумал что решение надо для ленивых...
https://wiki.freepascal.org/Play_Sound_Multiplatform

Зря ерничаете, я это проект видел, но это не то что нужно. Вы вопрос мой читали или только заголовок прочли?
Звук нужно встроить в форму со всеми удобствами, а не загружать его с диска. Как картинку в компоненте Image мы задаем через ресурсы формы Picture. На выходе есть екзешник и ни каких дополнительных файлов.

Знаю, что можно в ресурсы wav запихать, потом извлекать их как файлы в какю-нибудь временную папку и проигрывать, но мне такой вариант не подходит. Исполняемый файл будет запускаться на системе, где не будет возможности сохранять файлы.

[SSerge]

files32
если судить по палитре компонентов 8-го codetyphon под линуксом, единственный компонент для работы со звуком, похожий на вменяемый - ACS I/O
(TACSAudioOut). Оно вроде бы может воспроизводить из потока.

Вот тут какой-то горячий мексиканский парень пишет о нём, приводя пример: https://gladiston.net.br/en/programacao ... omponents/
Лично меня в примере смущает вот что: гражданин Сантана под Windows вместо этого применяет MMSound, технология коего, насколько помню, почти неприемлема на практике из за громадных задержек при воспроизведении, щелчков при наложении двух разных источников и прочего г-на. Под Windows, кажется, кроме прямого взаимодействия с directSound, больше для воспроизведения звука, который требуется привязать к визуальным событиям, ничего нормально не работает.

[delphius]

Знаю, что можно в ресурсы wav запихать, потом извлекать их как файлы в какю-нибудь временную папку и проигрывать, но мне такой вариант не подходит. Исполняемый файл будет запускаться на системе, где не будет возможности сохранять файлы

А зачем его из RCDATA сохранять на диск, если можно будет просто читать в memorystream и скармливать компоненту работы со звуком? А вот непосредственно со звуком универсального кросплатформа нет, придется извращаться.

[iskander]

если судить по палитре компонентов 8-го codetyphon под линуксом

А зачем нам кузнец? Почему бы просто не выбрать /Пакет/Сетевой диспетчер пакетов/ACS?

[files32]

скармливать компоненту работы

А вот тут по подробнее. Это какой компонет умеет брать из потоков? Что мне встречались умеют брать только файл.

[delphius]

скармливать компоненту работы

А вот тут по подробнее. Это какой компонет умеет брать из потоков? Что мне встречались умеют брать только файл.

Я не буду с этим спорить, надо просто попробовать самому руками, но загружают они все в любом случае в память из файла, перед проигрыванием.

Во вложении для примера memorysound.zip сделал под windows (MMSystem) загрузку и проигрывание wav из ресурса, компилируется под чистым fpc

Можно проверить и под лазарем на какой нибудь визуалке, например на PlayWavePackage
UPD. Посмотрел компонент, под win использует тоже MMSystem, а под остальные (Linux/MacOS) пытается найти установленный внешний проигрыватель, методом перебора и запуском его путем передачи файла в качестве параметра, поэтому не подойдет.

Ну, значит, из пушки по воробьям Audio Components Suite for Lazarus/Delphi
UPD. Проверил работу компонента под win и под ubuntu. Нормально воспроизводит из ресурса. Под MacOS надо проверять, но тоже должно работать. Во вложении пример acssound.zip.

[SSerge]

Боже ж ты мой. 2023-й год. До сих пор, получается, не написано ни одного компонента/библиотеки для fpc, позволяющих работать со звуком без вызова коллекции внешних утилит. Неужели всем достаточно найти неизвестно какой плеер в системе, загрузить его, и сунуть ему поток на вход. И то что он может не загрузится, загрузится с задержкой, зависнет в конце концов - никого не волнует?

[Seenkao]

А вот непосредственно со звуком универсального кросплатформа нет, придется извращаться.

Что подразумевается под "универсальной кроссплатформой"? OpenAL идёт везде. Я пользуюсь, но делать всё всё равно надо ручками.
ZenGL воспроизводит OGG, WAV.
GLScene вроде больше форматов воспроизводит.
ACS не пользовался.

Для LCL наверно больше подойдёт GLScene, но он тоже не грузит "автоматом" ресурсы (хотя могу ошибаться).

Добавлено спустя 1 минуту 3 секунды:
О, я же забыл про Castle Game Engine!!! Он тоже работает с LCL.

[delphius]

Что подразумевается под "универсальной кроссплатформой"?

Без использования внешних dll/so, без "танцев с бубном" с кодовой базой/модулями, чисто под звук, не комбайн.
Условие задачи - единый исполняемый файл, собранный вместе с ресурсами, в т.ч. и аудио.
Ну вот, ACS вполне со всем справился осталось проверить под Linux/MacOS

[Seenkao]

delphius, они все используют внешние dll/so/dylib. Просто надо понимать, что часть этих библиотек поставляются вместе с ОС. Если мы используем определённый формат файла, то нам его надо декодировать для воспроизведения и для этого нужны дополнительные кодеки.

Просто есть уже готовые решения, которыми и пользуются люди.

Добавлено спустя 1 минуту 37 секунд:

Ну вот, ACS вполне со всем справился осталось проверить под Linux/MacOS

он не будет работать под MacOS, там ни чего для этого не сделано.

[delphius]

Если мы используем определённый формат файла, то нам его надо декодировать для воспроизведения и для этого нужны дополнительные кодеки.

Именно поэтому выбран формат wav с возможностью декодирования средствами пакета)

он не будет работать под MacOS, там ни чего для этого не сделано.

Ну надо же проверить)
И прикрутить что-то ещё, чтобы работало))) 2023 год же