Как играть wav-файл в Delphi?

Какие функции доступны в Delphi для проигрывания звукового файла?

19
задан Johan - reinstate Monica 24 March 2016 в 14:43
поделиться

4 ответа

Вот самый быстрый путь:

uses MMSystem;

procedure TForm1.Button1Click(Sender: TObject);
begin
  sndPlaySound('C:\Windows\Media\Tada.wav',
    SND_NODEFAULT Or SND_ASYNC Or SND_LOOP);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  sndPlaySound(nil, 0); // Stops the sound
end;
29
ответ дан 30 November 2019 в 03:08
поделиться

С функцией sndPlaySound от WIN32-API (Единица MMSystem):

sndPlaySound ('C:\Windows\Media\Tada.wav', SND_ASYNC);

4
ответ дан 30 November 2019 в 03:08
поделиться

Эта страница объясняет довольно хороший, как использовать функцию sndPlaySound и как встроить wav-файл как ресурс: http://www.latiumsoftware.com/en/delphi/00024.php

4
ответ дан 30 November 2019 в 03:08
поделиться

Полное учебное руководство доступно в: http://sheepdogguides.com/dt3f.htm

Это немного старо. Но это должно работать.

2
ответ дан 30 November 2019 в 03:08
поделиться
Другие вопросы по тегам:

Похожие вопросы: