用OLE控制
使用Delphi2.0提供的“OLE接收框”组件，我们可以利用OLE嵌套的方法很快地为一个应用程序加入背景音乐，音乐文件可以是WAV文件或MIDI文件。
1.进入Delphi2.0系统环境，建立一个新的Form。建立后对表单样式进行一些设置，如屏幕大小、按钮、显示的文字等，做出一个漂亮的屏幕界面。选择组件板“(ComponentPalette)”中的“系统组件(SYSTEM)”选项卡，点击“OLEcontainer”组件，并将其拖至Form中任意位置即可建立一个OLE接收框(Olecontainerl)。在Olecontainer1上点击鼠标右键并选择快捷菜单中的“插入对象(InsertObject…)”，然后在“插入对象”窗口中选择“媒体剪辑”，选中“以图标显示”栏(必须选中此栏，否则无法将其隐藏起来)，按“确认”键退出。
2.在“媒体播放机”窗口中，选择“文件”、“打开”，从文件列表中选择想要作为背景音乐的声音文件。由于音乐文件一般不是很长，所以要求循环播放，可以通过设置“媒体播放机”重复播放来实现。然后选“重放的控制条”前的选中标记，确认后退出。
3.回到Delphi2.0系统环境，在“对象监视器(ObjectInspector)”窗口中选择“Olecontainer1”，设置它的“Visible”属性设为Flase(不可见)，“Autosize(自动调整大小)”属性设为Flase;再选择Form1的“事件页标(Events)”，加入Form1的FormCreate过程:
Procedure TForm1.FormCreate(Sender:TObject);
begin
Olecontainer1.Dovelb(0);
end;
4.按下“F9”键即可运行此程序
送点分吧！！！
]