Delphi中多媒体组件使用解析

2016-02-19 16:43 5 1 收藏

最近很多朋友喜欢上设计,但是大家却不知道如何去做,别担心有图老师给你解答,史上最全最棒的详细解说让你一看就懂。

【 tulaoshi.com - 编程语言 】

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

  组件的使用作以详解。

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

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

  /false即可。

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

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

  1.open方法:

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

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

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

  procedureTForm1.FormCreat(Sender:Tobject);  begin  with MediaPlayer1 do  begin  DeviceType:=dtCDAudio;  Visible:=False;  open;  play;  end;  end;

  2.Save方法:

  Save方法用于将当前装入的媒体内容保存到由FileName属性指定的文件中。对于不能用媒体存取的设备(如Videodiscs),Save方法被忽略。

  3.Rewind方法:

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

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

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

  procedureTForm1.FormClick(Sender:Tobject);  begin  MediaPlayer1.DeviceType:=dtWavAudio;  MediaPlayer1.fileName:=′c:windowschimes.wav′;  Button1.Caption:=′返回并开始播放′;  Button1.width:=125;  end;  procedureTForm1.Button1Click(Sender:Tob瞛ect);  begin  MediaPlayer1.Rewind;  MediaPlayer1.play;  end; 

  4.Resume方法:

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

  5.Close方法:

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

  6.PauseOnly方法:

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

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

来源:https://www.tulaoshi.com/n/20160219/1612890.html

延伸阅读
    随着计算机技术的发展,多媒体电脑开始走进千家万户,成为人们的常用工具,多媒体制作的需求量也变得越来越大。在这种情况下,各种各样的多媒体开发工具应运而生,其中由Marcromedia公司开发的多媒体创作工具Autherware,因为简单易用,无须编程即可制作具有交互功能的多媒体产品,而深受广大多媒体爱好者欢迎的。Authorwa...
在上期我们已完成了“音乐欣赏”主界面的制作,如图1所示。 图1主界面 由于还没有制作分界面,所以点击左侧的按钮画面不会发生跳转,这次我们就讲解期中两个模块的设计步骤。 一、“作品赏析”部分内容的制作 步骤1:导入背景图片 双击“作品赏析”组图标进入下一层设计窗口,拖动一个显示图标到流程线上,命名为“背景-作品欣赏”,双...
Delphi提供了功能强大的 DBGrid组件,以方便进行数据库应用程序设计。但是如果我们仅仅利用DBGrid组件,每一个获得焦点(Grid)只是一个简单的文本编辑框,不方便用户输入数据。Delphi也提供了一些其他数据组件来方便用户输入,比如DBComboBox,DBCheckBox等组件,但这些组件却没有DBGrid功能强大。Delphi能不能象Visual Foxpro那样让DBGri...
在VB中用API实现多媒体主要是调用Windows的mmsystem.dll库。以下为调用API的声明(这些代码放在程序的声明部分中): 1.′播放CD和AVI所需要的声明。 DeclareFunctionmciSendStringLib″MMSYSTEM″(ByVal lpstrCommandasString,ByVallpstrReturnStrasAny,By ValwRetumLenasInteger,ByValhCallBackasInteger)as Long ...
一、前言 随着多媒体硬件环境和软件环境的不断完善,目前,大部分计算机软件开发中都涉及多媒体软件技术的应用。 进行多媒体应用程序设计,从原理上说,可以采用从C 到多媒体专用开发系统(如TOOLBOOK、AUTHORWARE、DIRECTOR)等多种层次的工具。然而,由于多媒体软件涉及的媒体复杂多样、开发周期短并且需要多种专业人员参与,因此,...

经验教程

422

收藏

86
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部