Temporary Archive (Read Only): Music Demo

Print Page | Close Window

Music Demo

Printed From: Mirage Source
Category: Tutorials
Forum Name: Temporary Archive (Read Only)
Forum Discription: Temporary 3.0.3 archive tutorials, will be deleted when converted.
URL: http://ms.shannaracorp.com/backup-forums/forum_posts.asp?TID=144
Printed Date: 20 December 2006 at 5:52pm
Software Version: Web Wiz Forums 8.01 - http://www.webwizforums.com

Topic: Music Demo

Posted By: Sync
Subject: Music Demo
Date Posted: 11 February 2006 at 3:06pm

Difficulty: Easy 1/5

Originaly Posted By: Deuxexemachina

This one is for previewing midis before you actually set them. Bits and pieces of code here, but easy to add.

For starters, this is for the button click command(I called it 'Play' and cmdPlay).

Private Sub cmdPlay_Click()
Call StopMidi
Call PlayMidi("music" & scrlMusic.Value & ".mid")
End Sub

and, for the command button Cancel.

[code]
Private Sub cmdCancel_Click()
Call StopMidi
Call PlayMidi("music" & Trim(STR(Map.Music)) & ".mid")
Unload Me
End Sub
[code]

That's really all that's necessary if I'm not missing anything.