vb教程 第8章 多 媒 体

VisualBasic6.0基础教程百度文辑系列之vb6.0教程第8章多媒体【案例29】“视频播放器”程序8.1【案例30】“多媒体浏览器”程序8.28.1【案例29】“视频播放器”程序8.1.1多媒体控件概述1．多媒体控件简介VisualBasic提供了多种可实现多媒体播放的控件，例如Animation、ActiveMovie、Multimedia和MediaPlayer等，使用这几个控件可以播放常见的WAV、MP3、MIDI、MOV、AVI、MPEG、CD和VCD等基本的多媒体音频、视频信息。它们都属于ActiveX控件，可以采用第7章所述方法加载到当前工程文件的工具箱中。多媒体控件的图标、控件名称、所在的部件名称和文件名称如表8-1-1所示。图标控件名称所在部件名称文件名称AnimationMicrosoftWindowsCommonControls－28.0MSCOMCT2.OCXActiveMovieMicrosoftActiveMovieControlAMOVIE.OCXMMControl（也叫MultimediaMCI）MicrosoftMultiMediaControl8.0MCI32.OCXMediaPlayer或WindowsMediaPlayMediaPlaye或WindowsMediaPlayMSDXM.OCX表8-1-1多媒体控件的图标、控件名称、所在的部件名称和文件名称注意ActiveMovie控件由于存在兼容性问题，在某些不同版本的操作系统下无法正确执行。MediaPlayer控件是由Windows的媒体播放机（WindowsMediaPlayer）所提供，并随Windows的版本更新而更新，现在已经更新到第10版。在使用多媒体控件方面，这些多媒体控件各有特点。使用较多、功能较强的多媒体控件是MMControl（MultimediaMCI）控件和MediaPlayer控件。使用多媒体控件制作多媒体播放器程序，需要寻找要播放的多媒体文件。寻找多媒体文件的方法有以下3种。2．寻找多媒体控件文件的方法（1）直接在命令中给出文件的路径和文件名称。这种方法比较简单，文件不可选择。（2）使用通用对话框中的“打开”对话框。这种方法设计时比较方便，搜索和打开文件的对话框的形式比较规范和通用。（3）使用驱动器列表框、目录列表框、文件列表框和组合框4个控件对象设计的文件管理器。这种方法使用时比较有利于浏览多媒体文件，速度快且直观。1．MultimediaMCI多媒体控件MultimediaMCI多媒体控件通常也叫MMControl多媒体控件。它用于管理媒体控制接口（MCI）设备上的多媒体文件的录制和播放。这个控件就是一组按钮，它用来向声卡、MIDI序列发生器、CD-ROM驱动器和视频VCD播放器等设备发出MCI命令。8.1.2多媒体控件使用MultimediaMCI控件制作的多媒体播放器，在播放时会自动打开另一个播放窗口，只有当使用了关闭设备菜单命令Close时，窗口才会关闭。在用鼠标调整播放窗口大小时，播放窗口中的内容会自动随之改变，可以很方便地调整播放画面的大小。MCI控件可以播放WAV、MP3、MIDI、MOV、AVI、MPEG和CD等多媒体文件，而且还可以播放带声音的Windows视频（AVI）文件。在设计时，将MultimediaMCI控件添加到一个窗体上后，其外观是一组按钮，如图8-1-1所示。图8-1-1MultimediaMCI控件添加到窗体上时的外观这些按钮类似于通常的VCD机上的按键，可以对这些设备进行常规的启动、播放、前进、后退和停止等操作，其按钮图标、名称和功能如表8-1-2所示。按钮图标按钮名称按钮功能Prev（前一个）回到当前轨迹的起点处Next（下一个）到下一个轨迹的起点处Play（播放）播放多媒体Pause（暂停）使播放的多媒体暂停播放Back（向后步进）向后退一步（对于视频动画是向后退一帧）Step（向前步进）向前进一步（对于视频动画是向前进一帧）Stop（停止）使播放的多媒体停止播放Record（录制）对多媒体进行录制Eject（弹出）弹出光驱，退出光盘表8-1-2MultimediaMCI控件按钮的图标、名称和功能除了一些控件通用的属性、方法与事件外，MultimediaMCI控件还具有众多的特性，限于篇幅，下面仅介绍其最常用的部分，其他未介绍部分，请参考MSDN文档。2．MultimediaMCI控件常用的属性（1）AutoEnable属性：它决定了MultimediaMCI控件是否能够自动启动或关闭控件中的某个按钮。当其值为True时，MultimediaMCI控件就启用指定MCI设备类型在当前模式下所支持的全部按钮；当其值为Flase时，不能启用或禁用按钮。这一属性还会禁用那些MCI设备类型在当前模式下不支持的按钮。AutoEnable属性的作用可以替代ButtonEnabled属性的作用。当Enabled和AutoEnable属性同时为True时，ButtonEnabled属性就不起作用。（2）ButtonEnabled属性：它决定了是否启用或禁用控件中的某个按钮，禁用按钮以淡化形式显示。当其值为True时，则启用指定的按钮；当其值为Flase时，不启用指定的按钮。对于这种属性，Button部分可以是以下任意一种：Back、Eject、Next、Pause、Play、Prev、Record、Step或Stop。也就是说，该属性是由9个属性组成的，它们分别是：BackEnabled属性、PlayEnabled属性、NextEnabled属性、StopEnabled属性等。例如：为了禁用Stop按钮，可以使用的语句如下。[Form.]MMControl.StopEnabled=False（3）ButtonVisible属性：该属性决定是否显示控件中的某个按钮。当其值为True时，则显示指定的按钮；当其值为Flase时，则隐藏指定的按钮。同ButtonEnabled属性类似，ButtonVisible属性中的Button部分也是由前述9个部分构成。例如：为了隐藏Step按钮，可以使用的如下语句。[Form.]MMControl.StepVisible=False（4）DeviceType属性：该属性用来指定要打开的MCI设备的类型。MultimediaMCI控件可以播放的媒体类型取决于所使用的计算机中所具有的MCI设备，在使用该控件前，需要先为其指定所使用的MCI设备类型，可用的类型如表8-1-3所示。设备类型字符串文件类型设备名称CdaudioCdaudio音频CD播放器DigitalAudioTapeDat数字音频磁带播放器Digitalvideo（notGDI-based）DigitalVideo窗口中的数字视频OtherOther未定义MCI设备OverlayOverlay覆盖设备ScannerScanner图像扫描仪SequencerSequencer.MID音响设备数字接口（MIDI）序列发生器VcrVCR视频磁带录放器AVIAVIVideo.AVI视频文件VideodiscVideodisc视盘播放器WaveaudioWaveaudio.WAV播放数字波形文件的音频设备VCDMpegvIDEO.Mpeg播放VCD表8-1-3MCI设备所支持的类型（DeviceType属性的值）（5）FileName属性：该属性用于指定要播放的多媒体文件，其值为包含文件目录和文件名称的字符串。（6）Notify属性：它决定了下一条MCI菜单命令是否使用MCI通知服务。如其值为True，则Notify属性在下一条MCI菜单命令完成时，会触发一个回调事件（Done）；如其值为False（默认值），则下一条MCI菜单命令完成时，不触发Done事件。在设计时该属性不可使用。（7）Orientation属性：它决定了MMControl控件中的按钮是水平还是垂直排列。其值为0（mciOrientHorz）时，按钮水平排列；其值为1（mciOrientVert）时，按钮垂直排列。（8）Wait属性：它决定MultimediaMCI控件是否要等到下一条MCI菜单命令完成，才能将控件返回应用程序。在设计时，该属性不可用。如果其值为True，则MultimediaMCI控件必须等到下一个MCI菜单命令完成后才能将控件返回应用程序；如果其值为False，则MultimediaMCI控件不需要等到MCI菜单命令完成就可将控件返回应用程序。赋给该属性的值只对下一条MCI菜单命令有效。后面的MCI菜单命令会一直忽略Wait属性，除非赋给它另外一个值。3．MultimediaMCI控件的常用命令MMControl控件的Command属性指定了将要执行的MCI命令。在设计时，该属性不可用。Command属性的格式及其功能如下。MMControl.Command[=cmdstring]参数cmdstring给出了将要执行的MCI命令的名称：Open，Close，Play，Pause，Stop，Back，Step，Prev，Next，Seek，Record，Eject，Sound或Save。这些命令将被立即执行，并将错误代码存放在Error属性中。表8-1-4给出了这些命令的名称和它们所用的属性。命令命令的含义及其属性Open打开一个MCI设备。所用属性：Nonfy（False）、Wait（True）、Sharable、DeviceType、FileNameClose关闭一个MCI设备。所用属性：Notify（False）、Wait（True）P1ay使用MCI设备播放一个多媒体文件。所用属性：Notify（False）、Wait（False）、From、ToPause暂停MCI设备的播放或记录。如果在MCI设备已经暂停时执行这一命令，则重新开始播放或记录。所用属性：Notify（False）、Wait（True）Stop停止MCI设备的播放或记录。所用属性：Notify（False）、Wait（True）Back将MCI设备的轨道后退一步，即向后单步。所用属性：Notify（False）、Wait（True）、FramesStep将MCI设备的轨道向前一步，向前单步。所用属性：Notify（False）、Wait（True）、FramesPrev回到当前轨迹的起点，即定位到当前曲目的开始处。如果在上一次执行Prev命令之后的三秒内再次执行了这一命令，则回到前一个轨道的起点处，即定位到上一个曲目的开始处。如果当前轨道是第1个，即在第一个曲目内，则回到第1个轨道的起点处，即定位到第一个曲目的开始处。所用属性：Notify（False）、Wait（True）Next定位到下一个轨道的起点处，即定位到下一个曲目的开始处，如果已经处在最后一个轨道，即最后一个曲目内，则定位到最后一个轨道起始处，即曲目的开始处。所用属性：Notify（False）、Wait（True）Seek如果没有进行播放，则搜索一个位置（位置由To属性给出）；如果播放正在进行，则从给定位置开始继续播放。所用属性：Notify（False）、Wait（True）、ToRecord使用MCI设备进行记录。所用属性：Notify（True）、Wait（False）、From、To、Recordmode（0-Insert）Eject将媒体弹出，即将光驱弹出。所用属性：Notify（False）、Wait（True）Sound播放声音。所用属性：Notify（False）、Wait（True）、FileNameSave保存一份打开的设备文件。所用属性：Notify（False）、Wait（True）、FileName表8-1-4MMControl控件的Command属性中的命令及其需要的属性在使用命令之前，如果没有对某个属性进行设置，那么它可以使用默认值（在属性名后面的括号中给出），也有可能不使用该属性（如果没有默认值的话）。MultimediaM