Needed a simple audio player component

[Davo]

I'm building a spoken countdown clock and need a very simple component that will play pre-recorded voice files. I've searched and read the many references to audio in the Lazarus Forum but am uncertain how to proceed. Can you please suggest a suitable component?

[Blaazen]

I don't know about "component" but there's many libraries around. Usually, they are just headers to cross-platform third-party libraries (written in C, like PortAudio). If your files are MP3, search for headers to MPG123 library. Or try search for UOS, maintained by FredVS - forum member.

[BigChimp]

http://wiki.lazarus.freepascal.org/Multimedia_Programming#Playing_Sounds

[Davo]

Thanks for your replies Blaazen and BigChimp. Your assistance is really appreciated.

I tried the uos player and did successfully incorporate it into my application. It's a great player but it is really overkill for what I want. Since I don't mind my application being restricted to Windows I turned instead to the plain vanilla call playsound(filepath,0,0) which is sufficient for my purposes. As for the volume control I used a trackbar named tbVolumeControl and modified a code snippet that I found on another thread as follows :

procedure Tcontrolpanel.tbVolumeChange(Sender: TObject);
var
  MyWaveOutCaps: TWaveOutCaps;
  Volume: LongInt;
begin
  Volume:= 50000 * tbVolume.position div 100;
  if WaveOutGetDevCaps(
    WAVE_MAPPER,
    @MyWaveOutCaps,
    sizeof(MyWaveOutCaps))=MMSYSERR_NOERROR then
      WaveOutSetVolume(WAVE_MAPPER, Volume);
end;

Again thanks for your help.

 

[metis]

Hi Davo,

ever tried "eSpeak" ?

http://espeak.sourceforge.net/

metis