using System;
using System.Drawing;
using System.Collections;
using System.ComponentModel;
using System.Windows.Forms;
using System.Data;
using DxVBLib;
namespace 播放音乐
{
/// <summary>
/// Form1 的摘要说明。
/// </summary>
public class Form1 : System.Windows.Forms.Form
{
/// <summary>
/// 必需的设计器变量。
/// </summary>
private System.ComponentModel.Container components = null;
public Form1()
{
//
// Windows 窗体设计器支持所必需的
//
InitializeComponent();
directX=new DirectX7Class();
performance=directX.DirectMusicPerformanceCreate();
composer=directX.DirectMusicComposerCreate();
loader=directX.DirectMusicLoaderCreate();
performance.Init(null,0);
performance.SetPort(-1,4);
performance.SetMasterAutoDownload(true);
//chordMap=loader.LoadChordMap(@"F:\游戏音乐(mid)\GAME01FM.MID");
try
{
chordMap=loader.LoadChordMap("CHORDMAP.CDM");
}
catch (Exception)
{
MessageBox.Show("Could not load ChordMap."+"Please ensure that CHORDMAP.CDM is"+"in the directory of this exectutable.");
}
//
// TODO: 在 InitializeComponent 调用后添加任何构造函数代码
//
}
/// <summary>
/// 清理所有正在使用的资源。
/// </summary>
protected override void Dispose( bool disposing )
{
if( disposing )
{
if (components != null)
{
components.Dispose();
}
}
base.Dispose( disposing );
}
#region Windows 窗体设计器生成的代码
/// <summary>
/// 设计器支持所需的方法 - 不要使用代码编辑器修改
/// 此方法的内容。
/// </summary>
private void InitializeComponent()
{
this.button1 = new System.Windows.Forms.Button();
this.SuspendLayout();
//
// button1
//
this.button1.Location = new System.Drawing.Point(96, 192);
this.button1.Name = "button1";
this.button1.TabIndex = 0;
this.button1.Text = "button1";
this.button1.Click += new System.EventHandler(this.button1_Click);
//
// Form1
//
this.AutoScaleBaseSize = new System.Drawing.Size(6, 14);
this.ClientSize = new System.Drawing.Size(292, 266);
this.Controls.Add(this.button1);
this.Name = "Form1";
this.Text = "Form1";
this.ResumeLayout(false);
}
#endregion
/// <summary>
/// 应用程序的主入口点。
/// </summary>
private DirectX7 directX;
private DirectMusicChordMap chordMap;
private DirectMusicComposer composer;
private DirectMusicPerformance performance;
private DirectMusicSegment segment;
private DirectMusicLoader loader;
private System.Windows.Forms.Button button1;
private DirectMusicStyle style;
[STAThread]
static void Main()
{
Application.Run(new Form1());
}
private void button1_Click(object sender, System.EventArgs e)
{
try
{
style=loader.LoadStyle(@"F:\游戏音乐(mid)\GAME01FM.MID");
segment=composer.ComposeSegmentFromShape(style,64,0,2,false,false,chordMap);
composer.AutoTransition(performance,segment,(int)CONST_DMUS_COMMANDT_TYPES.DMUS_COMMANDT_FILL,(int)CONST_DMUS_COMPOSEF_FLAGS.DMUS_COMPOSEF_IMMEDIATE,chordMap);
}
catch(Exception)
{
MessageBox.Show("不能播放音乐");
}
}
}
}
谢谢阅读!
