Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как проиграть мелодию


Kremen ©   (2003-07-21 16:50:00) 

Как проиграть ккой-нибудь звук, пусть даже стандартный из виндов. Есть функция PlaySound, но чё то не въеду в параметры. объясните, плз


MyNik   (2003-07-24 09:31:00) [1]

В третьем параметре есть еще несколоко полезных вещей. Например SND_MEMORY, их, кстати, можно объединять по OR, тогда в первом параметре рисуется указатель на блок звука в памяти. Например MyStream.Memory. По-моему так...


iXuSs   (2003-07-21 22:26:00) [2]

Прежде, чем использовать PlaySound, нужно включить модуль mmsystem в список uses.

Далее, приведу простенькое проигрывание звука один раз, не прерывая работы приложения:

PlaySound("c:\somesound.wav", 0, SND_ASYNC);

Первый параметр - путь к файлу или же название системного звука, например:

PlaySound("SystemStart", 0, SND_ASYNC);

Учти, что путь к файлу имеет тип PChar, т.е. особый вид строки, а значит нужен особый подходит при использовании переменных типа String, например, загрузка из диалога:

PlaySound(PChar(OpenDialog.FileName), 0, SND_ASYNC);

Средний параметр используется для проигрывания файлов из ресурсов, обычно равен 0 или nil.

Третий параметр являет собой флаг, отвечающий за проигрывание звуков.

Помимо SND_ASYNC есть ещё SND_SYNC, который проигрывает звук, задерживая выполнение приложения. Наконец, используй SND_PURGE чтобы остановить проигрывание любого звука, вызванного в данной задаче, при этом, первый параметр должен быть равен 0:

PlaySound(0, 0, SND_PURGE);


Наверх

Титульная страница Поиск, карта сайта Написать письмо