Mega Code Archive

 

Categories / Delphi / Examples

 

Playwavfile

PLAY A WAV FILE: if FileExists(configdir + 'INTRO.WAV') then begin PlaySound(pchar(configdir + 'INTRO.WAV'), 0, SND_ASYNC);