张旭
　　Delphi是美国Borland公司推出的一个十分优秀的软件
开发平台。它以其强大的开发功能在众多的开发环境中独
占鳌头，尤其是它在多媒体软件的开发上更是技高一筹。
在Delphi的组件板system页上有一个称为MediaPlayer的
组件，它是多媒体软件制作的核心，以下将就MediaPlayer
组件的使用作以详解。

　　MediaPlayer组件主要是用于控制MCI（MediaContr
olInterface）设备，该组件提供了一系列按钮用于控制
诸如CD－ROM、MIDI、VCR等多媒体设备，这些多媒体设备
可以是硬件也可以是软件。这些按钮在缺省情况下从左到
右依次为：Play（播放）、Pause（暂停）、Stop（停止）
、Next（下一个曲目）、Prev（前一个曲目）、Step（步
进）、Back（后退）、Record（录音）、Eject（弹出媒
体）等9个功能按钮。在用户自己开发的程序中，多媒体设
备可以有两种方法实现以上9个功能，一种方法是将Media
Player组件放在窗体上，在程序运行时单击相应按钮；另
一种方法是用与按钮相应的“方法”（Method）来实现这
些功能。按钮与对应的“方法”见下表：

　　

　　以上9个按钮在视图和功能上均允许进行选择，使用
者可以通过改变objectinspector（对象监视器）的属性页
中的＋VisibleButtons和＋EnabledButtons属性来实现，
使用者只需要双击此属性使其上的“＋”变成“－”，然
后在下面新出现子属性表中将相应的子属性的值赋给true
／false即可。

　　MediaPlayer组件有许多的属性（property）和方法
（method）。属性是程序设计时在objectinspector（对象
监视器）中进行设置的，它无需开发程序的人自行编码（
当然也可以在代码中进行属性设置）；而方法是程序开发
者在程序代码中必须用到的过程和函数等。在正常情况下
，Delphi会将常用的属性设置为缺省值，这些值对于一般
的开发来说已经足够了，但是有一些关键的属性值却是必
须由使用者自己给定的。其中最重要的几个属性及其使用
说明见下表：

　　

　　MediaPlayer组件方法除了前面提到的对应9个按钮的
方法外，Delphi还提供了MediaPlayer组件的一些很重要
的方法，如open、save、rewind、resume、pauseOnly及cl
ose等，它们的使用详情如下：

　　1．open方法：

　　open方法用于打开一个多媒体设备。在调用该方法之
前，必须确保在MediaPlayer组件的DeviceType（设备类
型）属性中设定正确的多媒体设备类型。

　　【示例】以下代码用于在程序开始运行时就播放CD音
乐。

　　procedureTForm1．FormCreat（Sender：Tobject）
；

　　begin

　　withMediaPlayer1do

　　begin

　　DeviceType：ΚdtCDAudio；

　　Visible：ΚFalse；

　　open；

　　play；

　　end；

　　end；

　　 2．Save方法：

　　Save方法用于将当前装入的媒体内容保存到由FileNa
me属性指定的文件中。对于不能用媒体存取的设备（如Vi
deodiscs），Save方法被忽略。

　　 3．Rewind方法：

　　Rewind方法用于设定当前位置到媒体的开始处，也就
是用Start属性保存的值的位置。

　　【示例】以下代码用到一个MediaPlayer组件和一个B
utton组件。当单击Button按钮时，WavAudio媒体返回开
始处并进行播放。

　　procedureTForm1．FormClick（Sender：Tobject）
；

　　begin

　　MediaPlayer1．DeviceType：ΚdtWavAudio；

　　MediaPlayer1．fileName：Κ′c：ιwindowsιch
imes．wav′；

　　Button1．Caption：Κ′返回并开始播放′；

　　Button1．width：Κ125；

　　end；

　　procedureTForm1．Button1Click（Sender：Tobje
ct）；

　　begin

　　MediaPlayer1．Rewind；

　　MediaPlayer1．play；

　　end；

　　 4．Resume方法：

　　Resume方法用于重新开始播放或录制当前被暂停的多
媒体设备。

　　 5．Close方法：

　　Close方法用于关闭当前已打开的多媒体设备。

　　 6．PauseOnly方法：

　　PauseOnly方法仅仅用于暂停多媒体设备，如果该设
备已经暂停，则当PauseOnly方法被调用时，设备仍旧保持
暂停状态。

　　以上就是MediaPlayer组件最常用的属性和方法。如
果您喜欢的话，在您的应用程序中就可以使用这些属性和
方法实现多媒体的音频和视频效果。