《多媒体应用程序设计》参考资料

1/5多媒体应用程序设计一、前言VisualBasic是Microsoft公司开发的Windows应用程序开发工具。由于它具有先进的面向对象和事件的程序设计方法、简洁高效的程序开发环境、控制媒体对象手段灵活多样等特点，受到了广大多媒体软件开发人员的青睐，也因此成为制作CAI多媒体课件的理想工具。本文仅介绍用VB的多媒体控件MCI32.OCX设计多媒体应用程序的方法，希望能对初学用VB制作CAI课件的教师有所帮助。二、VB的多媒体控件MCI32.OCXMCI（媒体控制接口）是Microsoft公司为实现Windows系统下设备无关性而提供的媒体控制接口标准。用户可以方便地使用MCI控制标准的多媒体设备。MCI提供了与设备无关的接口属性。在一个窗体中可以同时操作多个MCI设备，通常应用程序是通过指定一个MCI设备类型来区分MCI设备的，设备类型指明了当前实际使用设备的物理类型，设备的类型可以用MCI控件MCI32.OCX的DeviceType属性来设置，这一命令的语法是：MMcontrol.DeviceType＝DeviceString属性值DeviceString描述不同的设备类型：属性值设备类型AVIVideo视频音频设备CDAudio激光唱盘播放设备VideoDisc可以使用程序控制的激光视盘机DAT数字化磁带音频播放机SequenceMIDI音序发生器DigitalVideo动态数字视频图像设备WaveAudio播放数字化波形音频的设备Overlay模拟视频图像叠加设备Other未给出标准定义的MCI设备MCI控件MCI32.OCX对多媒体控制接口MCI设备的多媒体数据文件实施记录或回放，是通过一组按钮来发出各种设备控制命令，以实现对音频面板、MIDI音序器、CD-ROM驱动器、音频CD播放机、录像带播放、录音带录放等设备的控制。MCI32.OCX的控制按钮有：向前（Prev）、向后（Next）、播放（Play）、暂停（Pause）、返回（Back）、单步（Step）、停止（Stop）、记录（Record）和出带（Eject）。应用程序对MCI32.OCX按钮的操作非常灵活方便，可以让用户直接操作控件的按钮，也可以在程序运行过程中用代码设置Command属性进行控制,这一命令的语法是：MMcontrol.Command＝CmdString

属性值CmdString是如下可执行命令名:Open、Close、Play、Pause、Stop、Back、Step、Prev、Next、Seek、Record、Eject、Sound和Save。当程序运行到设置命令的代码，命令将立刻执行。三、多媒体控件MCI32.OCX的调用在VisualBasic5.0专业版中，多媒体控件MCI32.OCX是作为可选用部件提供的。要使用它，首先要执行“工程—部件”菜单命令，在AvailableControls列表框中选中MicrosoftMultimediaControls6.0，就会在工具箱中出现MCI32.OCX图标。双击工具箱中的多媒体控件MCI32.OCX图标，调用MCI32.OCX控件，窗体FORM中出现一排灰色的媒体控制按钮。四、设计多媒体应用程序1、下面先以播放.WAV（波形文件）文件为例，说明设计VB多媒体应用程序的步骤。首先，创建一个窗体（Form），装入多媒体控件MCI32.OCX，双击工具箱中的MCI32.OCX图标，窗体上显示出形状类似录音机的控制按钮，但此时多媒体控件还不能工作（各按钮呈灰色），须通过程序代码来改变按钮的状态。其次，在Form_Load过程中，插入相应程序代码。SubForm_Load()MMControl1.Notify=FalseMMControl1.Wait=TrueMMControl1.DeviceType="WaveAudio"‘设置多媒体设备的属性MMControl1.FileName="c:windowsMmdatademo.wav"‘设置待播放的媒体文件MMControl1.Command="Open"‘打开媒体设备EndSub运行上述程序，控制按钮呈黑色，这时就可以使用Play、Record等按钮操作波形文件*.WAV了。例如用鼠标点击Play键就能听到*.WAV的音效。

不难发现，VisualBasic利用MCI32.OCX设计多媒体应用程序很容易掌握。2、CD播放器调入MCI32.OCX控件后，把下面的代码加入到相应事件中：SubForm_Load()MMControl1.DeviceType=“CDaudio"‘MCI设备类型为CD唱片MMControl1.Command=“open"EndSubSubForm_Unload(CancelAsInteger)

MMControl1.Command=“close"‘退出时关闭MCI设备

EndSub在CD驱动器中放入一张CD唱片，然后运行，将发现九个按钮中Prev、Next、Play、Eject四个按钮变黑（有效状态），点一下Play按钮，音乐出来了！若驱动器中无CD盘则所有按钮都处于无效状态。这样一个简易CD播放器就完成了。3、播放AVI（音频视频接口）文件电影（包括声音和图像）是现代化教学中应用最为广泛的媒体信息之一。下面以一个具体实例来说明如何播放AVI文件。假设用户当前目录下有名字为DEMO.AVI的视频音频文件，则可以利用VB播放该影片。（1）在VisualBasic的窗体中加入一个MCI32.OCX多媒体控件、一个PictureBox图片框控件和两个ComandButton命令按钮部件；（2）设置各个控件的属性，其中窗体命名为Form1，MCI32.OCX多媒体控件命名为MMControl1、PictureBox图片框控件命名为Picture1、两个ComandButton命令按钮控件分别命名为Play和Close；（3）编写各触发事件源程序代码并且运行。源程序代码为：PrivateSubPlay_Click()MMControl1.Filename="DEMO.AVI"

MMControl1.DeviceType=="AVIVIDEO"

MMControl1.hWndDisplay=Picture1.hWnd

MMControl1.Command="OPEN"

MMControl1.To=1

MMControl1.Command="SEEK"

MMControl1.Command="PLAY"

EndSub

PrivateSubClose_Click()

MMControl1.Command="STOP"

MMControl1.Command="CLOSE"

EndSub

以上仅描述了利用多媒体控制部件播放音频文件（.WAV）、CD唱片和音频视频文件（.AVI）的操作过程。实际上利用多媒体控制部件同样可以播放动画文件（.FLI、.FLC）、MIDI文件等其他媒体信