由于delphi7自带的MediaPlayer控件功能有限，比如很多格式不支持，不能在程序中自动增加与减小音量

所以后面设计的要求高的都采用WindowsMediaPlayer，这个需要安装

在Delphi7中选择“Component   ——Import   ActiveX   Control...”菜单，会弹出“Import   ActiveX0”窗口。在列表中选择“Windows   Media   Player(Version   1.0)”，再点击“Install”

使用：
安装后就可以在ActiveX选项卡下找到WindowsMediaPlayer控件拖到窗口就可以了用了

delphi11的使用方法
Component--Import Component--Import ActiveX Control，在弹出的ImportComponent窗口，在列表中选择Windows   Media   Player(Version 1.0),
再点Next--Next--Install to New Package, 在PackageName里随便输入一个包名， 如ActiveX，再点完成，在弹出的确认窗口点Yes--OK