>Hi
>
>Which is the fast method to play a sound within a form or procedure?
>
>TIA

PROCEDURE Playsound
PARAMETERS cWavFile

If IsNull(cWavFile)
Return .f.
EndIf

Declare Integer mciSendString IN WINMM String sendstr, Integer retstr, Integer szret, Integer callback

mciSendString("open " + FullPath(cWavfile) + " type waveaudio alias mmwav", 0, 0, 0)
mciSendString("play mmwav wait", 0, 0, 0)
mciSendString("close mmwav", 0, 0, 0)

Return .t.

ENDPROC

HTH

Alonso