🚀 go-pugleaf

In comp.os.ms-windows.programmer.tools, sp@cs.brown.edu (Seth Padowitz) writes:

>Just thought I'd point out that the samples given for using
>mciSendString were incorrect.
>The samples should have used mciExecute(), since it only takes a
>single string parameter.  mciSendString takes 4 parameters.
[...]
>Seth

OOPS!  You are absolutely correct!!  Got my wires crossed again :-)

The correct global declaration should be:

Declare Function mciExecute Lib "MMsystem"(ByVal lpCoMMand As String) As Integer

the examples should be:

In your program to play TADA.WAV...

Ret% = mciExecute("Open /windows/tada.wav alias TALK")
Ret% = mciExecute("Play TALK")
... go do something else (you shouldn't close till its finished playing)
Ret% = mciExecute("Close TALK")

to play "CANYON.MID":

Ret% = mciExecute("Open /windows/canyon.mid alias MUSIC")
Ret% = mciExecute("Play MUSIC")
... go do something else... 
Ret% = mciExecute("Close MUSIC")

to pause it

Ret% = mciExecute("Pause MUSIC")

to resume playing 

Ret% = mciExecute"Play MUSIC"

------------------------------------
That should fix it!  You may choose to place the message (between the quotes)
into a string.  Also you will note that I used the full path on the filename,
for some reason occassionally it can't find the path (unless the full path is
used) - your mileage could vary...

Apologies for the error and bandwidth!
- Galen -