Карта сайтаСсылкиКонтакты

Хостинг


Начать или остановить воспроизведение звука

PDF Печать
Статьи

Для остановки воспроизведения звука нужно просто вызвать эту же функцию воспроизведения с переданным параметром NIL.


procedure TForm1.Button2Click(Sender: TObject);
begin
    SndPlaySound('C:\Windows\Media\tada.wav', SND_LOOP Or SND_ASYNC);
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
    SndPlaySound(Nil, 0);
end;

 

Добавить комментарий


Защитный код
Обновить