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

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

Проиграть звук из файла!


EgorKA ©   (2003-06-21 21:42:00) 

Нужно проиграть звук из wav файла на харде, как не знаю :)
В инете лежат примеры тока через .rc.
Помогите, кто знает! Зарание спасибо!


Intell   (2003-06-23 13:11:00) [1]

var
Form1: TForm1;

const
Flags = SND_FILENAME or SND_ASYNC;


implementation

procedure TForm1.Button1Click(Sender: TObject);
begin
PlaySound("hello.wav",0,flags);
end;

...Чуть не забыл, добавь в Uses - MMSystem


DrPass   (2003-06-22 15:32:00) [2]

Там, где ты писал SND_FILENAME, допиши еще or SND_ASYNC


Anatoly Podgoretsky   (2003-06-22 11:58:00) [3]

Если ничего не помогает, то самое время прочитать инструкцию, в справке подробная информация по всем этим вещам.


Rocker   (2003-06-22 11:33:00) [4]

Возможно - используй потоки (TThread).


EgorKA   (2003-06-22 01:06:00) [5]

Пока файл звукавой играет, программа замирает, а это не радует!
Возможно ли врубать звук на фоне?


Mihey   (2003-06-21 23:54:00) [6]

PlaySound("filename", ...);


DrPass   (2003-06-21 23:44:00) [7]

только в примере из инета вместо SND_RESOURCE напиши SND_FILENAME


Song   (2003-06-21 22:28:00) [8]

PlaySound()


Наверх

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