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

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

воспроизведение звука [D7, WinXP]


Grief ©   (2005-05-29 22:24:00) 

Как просто быстро и нагрузно на проц средствами WinAPI воспроизвести wav файл, да так, чтоб его время воспроизведения не было паузой во время работы проги


kea   (2005-06-22 09:39:00) [1]

Eraser ©   (21.06.05 21:05) [8]

Предложил как вариант

Это просто кусок кода из прог-мы, в этом потоке я еще кучу чего делал кроме бляма, просто когда его сюда кидал не все лишнее вырезал поэтому слип(300) и остался...


Eraser   (2005-06-21 21:05:00) [2]

kea   (21.06.05 17:36) [7]

Дык зачем отдельный поток создавать врукопашную, ф-я PlaySound с доп. флажком SND_ASYNC это прекрасно делает.

Sleep(3000);- тоже непонятно зачем.


kea   (2005-06-21 17:36:00) [3]

Проигрывай в отдельной нити, что-вроде того:

var idThread : HWND; //глоб. что-бы потом нитть прибить

....
....
....

function PlayWav : boolean;
var lpThreadId : cardinal;
begin
idThread:= CreateThread(nil,
                           0,
                           @blym,
                           nil,
                           0,
                           lpThreadId );
Result:= idThread <> 0;
end;

function blym : boolean;
begin
try
 Result:= PlaySound('1.wav', 0, SND_FILENAME + SND_NOSTOP);
 Sleep(3000);
end;
finally
CloseHandle(idBoomThread);
end;
end;
...
...
гденибуть в программе
PlayWav;


Grief   (2005-06-04 23:52:00) [4]

А черт, ненагрущно я описался. описАлся а не опИсался. Помогите-таки все-таки со звуком


MaFon   (2005-05-31 00:09:00) [5]

Eraser, 5 баллоф


Eraser   (2005-05-30 14:46:00) [6]

Grief ©   (30.05.05 14:14) [2]
это начинает тормозить помоему


Проц фтопку )


MaFon   (2005-05-30 14:16:00) [7]

Так было ж сказано
"...нагрузно на проц..." :)


Grief   (2005-05-30 14:14:00) [8]

это начинает тормозить помоему, особенно когда это на свойстве LButtonDown - покликаешь и начинает тормозить...


MaFon   (2005-05-29 23:31:00) [9]

PlaySound('1.wav', 0, SND_FILENAME or SND_ASYNC);
так вроде.


Наверх

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