250 likes | 417 Views
第 15 章 多媒体编程初步. Visual Basic 程序设计教程. 本章介绍: 文字效果 播放动画 为应用程序定义动画精灵 多媒体 MCI 控件 RealAudio Active 控件 Microsoft ActiveMovie 控件. 15.2 一个 MP3 播放器的示例程序. 和前面各章一样,我们先来看一个 MP3 播放器的例子。界面效果如图所示。.
E N D
第15章 多媒体编程初步 Visual Basic 程序设计教程
本章介绍: • 文字效果 • 播放动画 • 为应用程序定义动画精灵 • 多媒体MCI控件 • RealAudio Active控件 • Microsoft ActiveMovie控件 Visual Basic程序设计教程
15.2 一个MP3播放器的示例程序 • 和前面各章一样,我们先来看一个MP3播放器的例子。界面效果如图所示。 在程序中,使用了通用文件对话框CommonDialog和控制播放进度的控件滑动条Slider以及VB的多媒体控件MMControl。使用定时器控制滑动条的进度。其中多媒体控件、滑动条控件分别在“部件”中的名称为 Microsoft MultiMedia Control 6和Microsoft Windows Common Control 6.0。 Visual Basic程序设计教程
15.3 文字效果 • 文字处理功能是多媒体技术中的一个重要内容。在VB中,一般的文字效果如立体字、色彩或者字体变大变小等,都是编程实现的,相对也比较简单。对一些较为复杂的如美术字、字体旋转、颜色渐变、竖排等,都需要使用API技术。API技术不在本书范围,因此我们这里简单介绍文字的程序处理。 Visual Basic程序设计教程
1.立体文字 • 在窗体(或对象)上立体文字的显示,是将同一个显示的字符采用不同的颜色在窗体上定位输出两次,在第二次输出时适当偏移输出的位置。 • 【例15-1】在窗体上显示立体文字。显示效果如图所示。 Visual Basic程序设计教程
2.滚动文字 • 滚动文字包括在窗体上由右往左、自下而上的显示效果,类似于电影电视中的片头字幕效果。实现滚动文字的方法之一是通过定时的方式使字所在的控件(比如标签)不断地移动位置,因而在视觉上产生了文字滚动的效果。 Visual Basic程序设计教程
3.伸缩文字 • 如果窗口的文字由大变小,再由小变大,这个效果看上去就是文字的伸缩。伸缩文字也是比较简单的一个设计,就是在一定的事件间隔中改变文字的位置和大小。 Visual Basic程序设计教程
VB中使用控件Animation创建一个对象,允许被用来播放即时动画,一般支持.AVI格式。AVI格式允许视频和音频交错在一起同步播放。而Animation只能播放没有声音的AVI文件。 • 【例15-4】编写一个复制文件的动画界面程序。程序界面如图所示 Visual Basic程序设计教程
1.Animation所在的位置 • 使用Animation,需要从“部件”对话框中打开“Microsoft Windows Common Controls-2.60,添加到VB的工具箱中。 • 2.Animation的属性 • Animation的许多属性和VB控件的同名属性相同。这里简单介绍其几个主要的专用属性,见表所示。 Visual Basic程序设计教程
3.Animation方法 • 动画控件Animation有多种方法,其使用与一般控件方法的使用相同。主要的方法 • (1)Open。打开播放的AVI文件。 • (2)Close。使控件Animation关闭当前打开的AVI文件。 • (3)Stop。在Animation中停止播放AVI文件。 • (4)Play。开始播放动画。 Visual Basic程序设计教程
动画精灵这是Microsoft为改善传统的人机交互界面而设计的一个非常有意思的技术。我们在许多Windows程序中见到过“小助手”之类的动画精灵,这就是Agent控件的作用。最初Agent预定了三个动画人物的形象。 Agent预定义的三个动画精灵,从左到右为:Genie、Merlin、Robby 15.5 为应用程序定义动画精灵 Visual Basic程序设计教程
VB中有部件Microsoft Agent Control 2.0,但还是需要检查一下你的机器上支持不支持Genie等动画精灵。精灵动画人物是以文件的形式提供的,描述文件的后缀为.acs,一个文件代表一个动画精灵人物。它们在机器上默认存放的位置为C:\Windows\MSAgent\Chars,另外安装MS Office的机器在Office10文件夹下面也有几个动画精灵人物,如Rover和F1等。 • 【例15.5】显示动画精灵 • 任务的示例 Visual Basic程序设计教程
15.6 多媒体MCI控件 • VB中的Microsoft MultiMdia Control 6.0作为支持MCI的控件,在“部件”中选择后被添加到工具箱,就可以在窗体上放置一个MCI的组合按钮,如图15.8所示。这些按钮都是待激活的。必须说明的是,在对象浏览器中,MCI是一个大的范围,我们这里只介绍其中的一个类MMControl。 Visual Basic程序设计教程
MMControl 控件的主要属性 Visual Basic程序设计教程
15.6.1 MCI的设备 • MCI支持的设备包括简单设备和复合设备。例如在Windows中的CD播放器就是一个简单的MCI设备。复合设备需要提供包括路径在内的数据文件,例如Wimdows Media Player(MMP)就需要打开被操作的源文件。 • MCI使用DeviceType指定其设备类型,语句格式为:MMControl.DeviceType[ = device$] Visual Basic程序设计教程
参数 device$ 是要打开的 MCI 设备的类型, • 如:AVIVideo(AVI格式视频)、CDAudio、DAT(数字录音带)、DigitalVideo(数字视频)、MMMovie(多媒体电影)、Overlay(微软的覆盖设备)、扫描仪、Sequencer(序列发生器)、VCR(视频磁带设备)、视盘或 WaveAudio等,也就是说上述这些都是MCI所支持的设备。 Visual Basic程序设计教程
15.6.2 MCI的Command • 在设置了MCI的设备之后,就需要使用Command属性把操作命令发给设备。在程序中,Command的使用格式为: • MMControl.Command[ = cmdstring$] • 参数 cmdstring$ 给出了将要执行的 MCI 命令的名称:Open, Close, Play, Pause, Stop, Back, Step, Prev, Next, Seek, Record, Eject, Sound 或 Save。这些命令被立即执行,并将错误代码存放在 Error 属性中 Visual Basic程序设计教程
15.6.3 MCI的事件和方法 • 当我们对在MCI上任何一个按钮进行点击操作,就会产生一个Button Click事件(这里的Button均指具体的按钮)。当按钮释放,会产生ButtonComplete事件。 • 对Button事件,系统将返回一个参数供程序进行操作。例如单击“Play”按钮时,产生的事件过程为: • Private Sub MMControl1_PlayClick(Cancel As Integer) • ………… ‘ 编程者可以在此对播放按钮进行程序代码的设计 • End Sub Visual Basic程序设计教程
15.7 RealAudio Active控件 • 使用RealAudio Active控件,选择“部件”中的“Real Player ActiveX Control Library”,在工具箱栏中就显示Real公司的著名图标标记,在窗体上放置Real Play控件,显示如图所示。 Visual Basic程序设计教程
RealAudio Player的主要属性 Visual Basic程序设计教程
【例15-6】 设计一个使用RealAudio Player控件的媒体播放器。 Visual Basic程序设计教程
MicroSoft ActiveMovie Control是微软公司推出的一个多媒体控件,支持在Http和VB下的多种媒体的操作,这个控件是为了设计在更高层次上的多媒体应用。从“部件”对话框中打开“控件”选项卡,选择Microsoft ActiveMovie Control。 15.8 Microsoft ActiveMovie控件 Visual Basic程序设计教程
如果控件列表中没有, • 则从http://www.ocxdump.com/download下载,然后在“部件”对话框中点击“浏览”,选择对应控件的文件Amovie.ocx,打开文件,则ActiveMovie控件就被安装到控件列表框中,然后选择对应的控件,“确定”后在工具箱中就会显示微软Windows播放器的图标,将控件放置在窗体上。 Visual Basic程序设计教程
【例15-7】编写一个使用Microsoft ActiveMovie控件的视频播放器程序 Visual Basic程序设计教程