Basic60多媒体信息控制.docx

第10章
多媒体信息控制

学习目标
¡ 掌握Visual Basic的坐标系统
¡ 掌握常用的绘图控件与绘图方法
¡ 学会使用多媒体播放控件的添加和使用
¡ 了解MicroSoft Agent控件的安装和使用
一、 Visual Basic坐标系统
¡ 系统坐标系:也称为“桌面〔屏幕〕坐标系〞。它的原点位于屏幕左上角的像素处，坐标值为〔0，0〕，窗体在桌面上的显示位置及大小，就是由系统坐标系决定的。
¡ 容器坐标系：窗体以及图片框、框架等控件都可包含各种其他的控件对象，称为“容器类对象〞。容器坐标系的原点位于容器对象工作区最左上角的像素处，即该点的坐标值为〔0，0〕。

二、绘图控件与绘图方法
〔1〕Shape控件
¡ 常用属性: Shape、BorderStyle、BorderColor、BorderWidth、BackStyle 、 BackColorFillStyle、FillColor

〔2〕Line控件
¡ 常用属性: BorderStyle、 BorderWidth

绘图方法
〔1〕画点方法
画点的实质是通过为指定像素设置颜色来实现的，格式如下：
[Object.] Pset [Step] (x，y)，[Color]
¡ Object: 是用于绘图的“容器〞对象名；
¡ Step：可选，是由CurrentX和CurrentY属性所指定的图形当前位置的参数。
¡ 〔x，y〕：分别是绘制点在容器坐标系中的水平坐标值与垂直坐标值；
¡ Color：用于指定绘制点的色彩，假设不指定Color，那么缺省色为当前对象设定的ForeColor颜色。
例：随机画点程序
¡ 本程序执行后得到的画面。运行程序，将在图片框中填充30000个彩色的点。点的位置是随机生成的，点的颜色也是随机生成的。填充过程给人一种如同“天女散花〞的感觉。

画线方法
画线方法的一般格式为：
[Object.] Line [Step] (x1，y1) —
[Step] (x2，y2)，[Color]，[B][F]
¡ Object：对象名，在当前对象上画线可缺省。
¡ 第一个Step：可选项，用于指定由CurrentX和CurrentY属性所提供的当前图形起点坐标。
¡ (x1，y1)：起点坐标，如果缺省，那么上一个画线方法的终点即为本次画线的起点。
¡ 第二个Step：可选项，用于指定由CurrentX和CurrentY属性所提供的当前图形终点坐标。

¡ (x2，y2)：必选项，终点坐标。
¡ Color：设置画线颜色的长整型数，如果缺省，那么使用ForeColor属性规定的颜色。
¡ B：可选项，用于绘制矩形，

¡ F：在使用B参数的前提下使用，用于指定对矩形以矩形边框的颜色进行填充。

实例讲解—画图板
¡ 本例制作了一个画图板，可以进行简单线条和图形的绘制。涉及到的技术要点包括文件对话框控件、图片框控件、选项按钮控件的用法、颜色设置方法的和绘制线条的Line方法等。
图片框控件
¡ 图片框的应用很广，不仅可用于绘制图形、显示图片或图像以及文本或数据，还经常作为其他控件的容器。使用图片框可以显示各种不同种类与格式的图形文件，如位图文件、图标文件、矢量图文件等。
加载图片方法

¡ 通过Picture属性为图片框加载图片；
¡ 使用LoadPicture函数加载图片：它的一般调用格式如下：
LoadPicture〔[Frame],[Size],[Colordepth],[x,y]〕
如在程序中参加如下的代码：
Picture1.Picture=LoadPicture〔〞c:\vb\Flower.Jpg〞〕
即可将“C:\VB\Flower.Jpg〞路径的图片文件加载到图片Picture1中。
鼠标事件
¡ 单击 〔Click 〕
¡ 双击事件 〔DblClick 〕
¡ 鼠标按下 〔MouseDown 〕
¡ 鼠标释放 〔MouseUp 〕
¡ 鼠标移动 〔MouseMove 〕
设计思路
关键问题
l LINE绘图方法

对象名.Line (x1,y1)-(x2,y2),Color,[B][F]

(x1,y1)：起点〔长方形的左上角〕的坐标；
(x2,y2)：终点〔长方形的右下角〕的坐标；
Color：图形的颜色；
[B]：图形为长方形
[B][F]：图形为填充长方形
例

¡ Line (0,0)-(1000,1000)
¡ Line (0,0)-(1000,1000),vbred,B
¡ Line (500,500)-(2000,2000),Vbred,BF

l 绘制图形的颜色设置

翻开颜色设置面板：
返回的颜色值为：

l 绘制图形的粗细

Picture1.DrawWidth = ？
DrawWidth属性可以返回或设置图片框绘制图形线条的宽度。

¡ 按下鼠标〔MouseDown〕过程
〔x,y〕:鼠标落下的点的坐标；
CurrentX，CurrentY：决定了绘制的起始坐标；
DrawMode：设置绘图的颜色模式，修改 DrawMode 属性值可以使画笔产生特殊的绘画特征。 画线中每个点的颜色取决于画笔的颜色和线中每一点所在背景像素的颜色。例如：如果 DrawMode 属件值为 6 ，当窗体的背景颜色是黑色时，所画的直线就是白色 即将背景颜色的“反〞作为像素的颜色代码。

1——Blackness 黑色
2——Not Merge Pen 与选项15相反
3——Mask Not Pen 将前景颜色的补色与背景颜色组合
4——Not Copy Pen 前景颜色的补色
5——Mask Pen Not 将背景颜色的补色与前景颜色组合
6——Invert 翻转前景和背景颜色
7——Xor Pen 前景和背景颜色出现一次，但是不同时出现
8——Not Mask Pen 与Mask Pen相反
9——Mask Pen 前景和背景颜色二合一
10——Not Xor Pen 与Xor Pen相反
11——Nop 不画任何图形
12——Merge Not Pen 背景和前景颜色的补色组合
13——Copy Pen 使用没有改变的ForeColor画图
14——Merge Not Pen 前景和背景颜色的补色组合
15——Merge Pen 前景和背景颜色组合
16——Whiteness 纯白色

¡ 移动鼠标〔MouseMove〕过程
Button=1: 按下左键
Button=2: 按下右键
Button=0：没有按下任何键

¡ 如果选择铅笔

¡ 如果选择矩形

三、多媒体播放控件
¡ 多媒体应用控件是以ActiveX控件的形式提供的，又称为“部件〞。 ActiveX控件，是利用Microsoft公司的ActiveX技术开发的一类控件的总称。
¡ 使用【工程】菜单中的“部件〞命令，从翻开的对话框的列表中，选取需要使用的“部件〞，单击“确定〞按钮，系统就会把选取的部件加载到控件工具箱中。

Multimedia MCI控件
¡ MCI〔媒体控制接口〕是Microsoft公司为实现Windows系统下设备无关性而提供的媒体控制接口标准。 Multimedia MCI控件专用于对多媒体控制接口MCI设备的多媒体数据文件实施记录和回放，从目的效果上来说，该控件通过一组按钮来发出种种设备控制命令以实现对诸如音频面板、MIDI音序器、CD-ROM驱动器、音频CD播放机、录像带播放、录音带录放等设备的控制。
MCI控件的添加
¡ 执行【工程】的“部件〞命令，将“Microsoft Multimedia Controls〞前的方框勾选，在工具箱中便会出现Multimedia 控件图标。
一个MP3播放程序

¡ Form_Load()
l ‘设置多媒体设备的属性
l MMControl1.Notify=False
l MMControl1.Wait=True
l MMControl1.Shareable=False
l MMControl1.DeviceType=" MpegVideo"
¡ End Sub
MediaPlayer控件
¡ Windows Media Player控件可以方便地完成播放控制、播放列表、CD/DVD支持、插件、字幕和网络流媒体回放等功能。Windows Media Player控件共包含20几种对象，在这些对象中，常用到其中的Player、Controls、Media和Playlist四个主要对象，下面就这四个常用对象作一简要介绍。
Player对象
Control对象
¡ 提供了对媒体播放进程的控制。它的常用属性有currentItem、currentPosition、currentPositionString三个。currentItem属性可以设置或返回当前的媒体；currentPosition可以设置或返回媒体当前位置，这是一个Double类型，单位是秒；currentPositionString返回的是一个字符串类型的位置信息，可以直接用来显示。
¡ Control对象的常用方法有fastForward、fastReverse、next、pause、play、previous、step、stop等。这一组方法的调用非常简单，分别表示快进、快退、播放列表中下一项、暂停、开始播放、播放列表中前一项、单帧和静止。
Media对象
Playlist对象
¡ Playlist对象是Windows Media Player控件中用于抽象和管理播放列表的一个对象。可以通过count属性得到列表项的个数，并通过一组方法对列表进行扩充、插入、删除和清空等操作。
实例讲解——多媒体播放器
¡ 本例使用Visual Basic中的Windows Media Player控件制作成了一个功能齐全的多媒体播放器。该播放器支持多种音频和视频格式，如MP3、AVI、WAV、WMV等。同时播放器实现了对播放文件的播放、快进、暂停等控制和播放列表的局部功能。本例涉及到的技术要点主要是Windows Media Player控件的添加和使用。
关键步骤
¡ 界面设计
¡ 媒体播放控制过程
¡ 媒体播放控制过程
¡ 播放列表功能
四、Microsoft Agent 控件
¡ Agent技术简介
¡ Agent控件的安装与添加
¡ Agent控件的调用与动画编程
¡ Agent控件的语音合成功能
¡ Agent控件的语音识别功能

技术简介
¡ Microsoft Agent是微软公司与1997年9月发布的一项代理软件开发技术，而后被继承到Internet Explorer4.0Plus 及更高版本中，目前的最新版本是，支持简体中文。Agent一词的中文意思是“代理〞，主要作用是提供一种易于理解和使用的操作界面，接受用户的指令、代替用户完成某些复杂繁琐的工作、或为用户提供帮助。

¡ Agent角色可由任何Windows程序调用。
¡ Agent角色支持更加生动、有趣的动作，如：听、说、写信、玩魔术、鼓掌、再见等上百种；
¡ Agent最为显著的特点是结合了语音功能，Agent角色不仅能说话，而且还能听懂用户发出的命令。
4.2 Agent控件的安装与添加
¡ 首先安装Microsoft Agent的核心组件 “msagent.exe〞；图10-28
¡ 然后安装Agent动画人物数据文件“Genie.exe〞、“Robby.exe〞、“Merlin.exe〞和“Peedy.exe〞，或到下面网站下载更多更丰富的动画角色：。
¡ 接着安“TTS〔Text-to-Speech〕Engine〞语音输出引擎；
¡ 最后安装“Speech Recognition Engine〞语音识别引擎文件“actcnc.exe〞。
4.3 Agent控件的调用与动画编程
¡ Agent控件被添加到工具箱后，就可以在多媒体应用程序中进行调用并操纵了。
4.4 Agent控件的语音合成功能
¡ 英文合成：在调用“Speak〞方法前参加一行代码“CurrentCharacter.LanguageID = &H409”；

¡ 中文合成：用WAV文件代替，给Speak()方法的第一个参数传递文字气球中包含的文字，给第二个参数传递一个WAV文件路径。 如：Merlin.Speak "欢送光临", "c:\welcome.wav"
实例讲解—密码登录
4.5 Agent控件的语音合成功能
¡ 动画人物可以识别的语音必须要预先定义，用“Add()〞方法来为命令窗口添加自定义命令。命令中有三个参数，第一个参数是命令的标识符ID，第二个参数是该命令在命令窗口中的显示标签，第三个参数是该命令对应的语音识别句子。当用户通过麦克风向动画人物发出命令时会激发IAgent的Command事件，可以编写一个接收Command事件的过程来完成与语音命令相对应的任务。

¡ 如为Genie添加“Time〞语音识别命令，格式为：
Genie.Commands.Add "Time", _
"What time is it?", _
"What time is it?"
实例讲解—我的机器人