Printable View
i was wondering how you can make your midi forever looping using the mmcontrol.
i tried this but its not working
____________________________________________
If Form1.MMControl1.Mode = 530 Then Form1.MMControl1.Command = "PREV" And Form1.MMControl1.Command = "PLAY"
_____________________________________________
Please Help...
Also see my Collision and PacMan engine Post!
I was thinking it might work if you change the code to this:
If MMControl1.Length > 0 And MMControl1.Length = MMControl1.Position Then
MMControl1.Command = "Prev"
MMControl1.Command = "Play"
End If
By the way, you cannot "AND" commands after an 'IF' command. You can only "AND" conditions for an 'IF' command to be true.
[This message has been edited by atjs (edited 08-01-1999).]
It's actually quite easy. In the MMControl's "stop" event, place the code you use to start playing the MIDI. When the MIDI stops playing, it will begin playing again from the start.
I forget exactly which event it is, but you can spot it pretty easily by scanning through the drop-down list of events in the VB IDE for your MM control.