资源描述
单击此处编辑母版标题样式,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,*,*,第七章：多媒体编程,本章要点：,使用多媒体控件处理音频文件,使用GDI处理图形图像,初步接触动画设计,1,7.1多媒体播放,7.1.1,1使用微软媒体控件播放音频,本例将制作一个基于AxActiveMovie控件的播放器。通过文件打开对话框选择文件。AxActiveMovie控件自身提供了一些按钮，使用这些按钮可以执行各种操作：如播放、暂停、关闭等。,2,（1）新建Windows应用程序后，创建Form1窗体。设置相关窗体属性,（2）执行【工具】|【选择工具箱项】命令，在Com组件标签中选择,ActiveMovieControl Object选项，如下图所示,将ActiveMovieControl控件加载到工具箱,3,在窗体添加ActiveMovieControl Object控件，形成的界面如图所示。,（3）添加时间处理程序。,4,2基于AxMMControl控件制作AVI动画播放器,基于AxMMControl控件制作AVI动画播放器步骤如下：,（1）新建Windows应用程序后，创建Form1窗体。向窗体添加一个Button控件，设置Button控件的Text属性如下：Button1.text=”打开”再添加一个Open控件。,（2）执行【工具】|【选择工具箱项】命令，在Com组件标签中选择Microsoft multimedia Control Object选项，如图所示。,5,（3）添加Microsoft multimedia Control，如图所示。,（4）添加Button1的Click事件过程。,Private Sub btnopen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnopen.Click,Open = video(*.avi)|*.avi,Open(),= Open,If (Not () Then,AxMMControl1. =,AxMMControl1.Command = open,End If,End Sub,6,7.1.2使用Windows媒体播放器控件播放音频,在Visual Basic .NET中可以引用Windows Media Player 组件，制作一个如图所示的多媒体播放程序。,具体操作是这样的：,（1）新建Windows应用程序后，创建Form1窗体。,进行相关参数设置,7,（2）执行【工具】|【选择工具箱项】命令，在Com组件标签中选择Windows Media Player选项，如图所示。然后，添加Windows Media Playe控件,（3）添加代码如下：,Private Sub btnopen_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnopen.Click,Dim As String,Open(),= Open,AxMediaPlayer1. =,End Sub,8,7.1.3使用API函数播放音频,可以使用Windows的API函数来播放音频文件。介绍其中两个：sndPlaySound函数和micExecute函数。它们都是来自Windows的winmm.dll动态链接库。其中sndPlaySound函数用于播放*.wav文件，而micExecute函数可以播放各种影音文件。,主要函数有：,使用sndPlaySound函数,使用mciExecute函数,9,使用sndPlaySound函数,（1）在VB.Net中，调用API函数必须先进行声明，它们的格式分别为：,Declare Function sndPlaySound Lib winmm.dll Alias sndPlaySoundA _,(ByVal SoundName As String, ByVal Flags As Long) As Long,（2）在程序中调用该函数来播放*.wav文件：,sndPlaySound (“文件名.wav”, 1 ）,（3）实现如图所示的界面，添加一个按钮控件，一个输入框控件和一个Open控件，用来打开文件,（4）添加源代码如下：,Public Class Form1,Declare Function sndPlaySound Lib winmm.dll Alias sndPlaySoundA _,(ByVal SoundName As String, ByVal Flags As Long) As Long,Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click,Dim As String,Open(),= Open,TextBox1.Text = 正在播放 +,sndPlaySound (, 1),End Sub,End Class,10,使用mciExecute函数,在上例中作如下修改：,1. 声明mciExecute以取代sndPlaySoundDeclare Function mciExecute Lib winmm.dll Alias mciExecute (ByVal lpstrCommand As String) As Long,2. 删除sndPlaySound(, 1)，添加： mciExecute(“Play”& ),通过如上修改后，点击Button控件，找到相应文件即可播放各种影音文件,11,7.2图形与图像程序设计,7.2.1图形的坐标系统,在学习绘图之前，首先要了解有关Visual Basic .Net的坐标系统，以此才能掌握绘图的位置和大小。在Visual Basic .NET 中，坐标以像素为单位表示。坐标系统是指在屏幕（screen）、窗体（form）、容器（container）上定义的表示图形对象位置的平面二维格线，一般采用数对（x，y）的形式定位。其中，x值是沿x轴点的位置，最左端是默认位置为0。y值是沿y轴点的位置，最上端是默认位置0，如图7-16所示。,属 性,说 明,Locate.Top,对象Y坐标,Locate.Left,对象X坐标,Locate.Width,对象的宽度,Locate.Height,对象的高度,Locate对象属性如下,12,7.2.1图形绘制,GDI+是Windows XP操作系统中提供二维矢量图形、图像处理和版式的部分。GDI+在 GDI（较早版本的Windows中提供的 Graphics Device Interface）的基础上进行了改进，添加了新功能并优化了现有功能。,GDI+函数位于System.Drawing命名空间中。,处理图形包括两个步骤：,（1）创建Graphics对象。,（2）使用Graphics对象绘制线条和形状、呈现文本或显示与操作图像。,Graphics对象在创建后，可用于绘制线条和形状、呈现文本或显示与操作图像。与 Graphics对象一起使用的主体对象有：,（1）.Color 结构：表示要显示的不同颜色。,（2）.Pen 类：用于绘制线条、勾勒形状轮廓或呈现其他几何表示形式。,（3）.Brush 类：用于填充图形区域，如实心形状、图像或文本。,（4）.Font 类:提供有关在呈现文本时要使用什么字体的说明。,13,color,颜色的设置是绘图功能中非常重要的一部分，在.NET Framework中可以通过Color对象类、ColorTranslator对象类、Color枚举来定义颜色,方法名称,说 明,FromArgb,语法：Color.FromArgb （Alpha,Red,Green,Blue）,功能：通过Alpha可设置混色的阴影或透明效果，通过基本三色Red,Green,Blue可以混出自行需要的颜色。四个参数值必须介于0-255,例：将Label1的背景色设为绿色，且设置Alpha的值为40,Label1.BackColor=Color.FromArgb（40,0,255,0）,FromKnownColor,语法：FromKnownColor( ByVal color As KnownColor ),功能：设置所需的颜色,例：将Label1的背景颜色设置为黄色,Label1,.BackColor=Color.FromKnownColor(KnownColor.Yellow),Color对象属性,14,使用ColorTranslator对象的方法来设置颜色,方法名称,说 明,FromOle,语法：ColorTranslator.FromOle（QBColor（颜色值）,功能：设置QBColoryanse1值，指定的颜色值为0-15,例：将Label1的背景色设为黑色,Button1.BackColor = ColorTranslator.FromOle(QBColor(0),FromHtml,语法：ColorTranslator.FromHtml（“HTML的颜色字符串”）,功能：使用HTML的颜色字符串来设置颜色,例： 将Label1的背景色设为白色,Label1,.BackColor = ColorTranslator.FromHtml(#ffffff),FromWin32,语法：ColorTranslator.FromWin32（&#十六进制值）,功能：使用十六进制值设置颜色,例：将Label1的背景色设为浅蓝色,Label1,.BackColor = ColorTranslator.FromWin32(&HC0000F),15,2.Graphics,Graphics用来创建画布对象。它就像是绘图时所使用的画布一般，可以供给画家在其中作画。使用GDI+绘图时必须先创建一个画布对象，然后才可以使用绘图对象的方法在画布上作画。,Graphics对象的创建语法如下：,Dim myGraphics As Graphics,myGraphics =控件对象名称.CreatGraphics(),在指定的控件对象中添加一个可供绘图的对象（myGraphics）。如下例：,Dim g As Graphics,g=Button1.CreatGraphics() 使用Button1创建一个名为g的画布对象,g=Label1.CreatGraphics() 使用Label1创建一个名为g的画布对象,Graphics对象的方法很多，如可以使用clear方法清除画布，使用dispose方法将Graphics对象从记忆清除。,16,常用的绘图方法有以下几种,1. DrawArc方法,2. DrawLines方法,3. DrawRectangle方法,4. DrawPolygon方法,5. DrawEllipse方法,17,3. Pen,Pen是画笔对象。就像是一支绘图时所使用的画笔，可以供给绘图命令在Graphics画布对象上作画。创建的语法如下：,Dim Pen As Pen（颜色，粗细）。,4. Brush对象,Brush对象是用于填充图形形状（如矩形、椭圆形、扇形、多边形和封闭路径）内部的对象。可用来绘制实心、渐变层的图形，使得图形显得较有质感。它包含有HatchBrush、LineGradienBrush、SolidBrush、PathGradienBrush对象等，这些对象是包含在Drawing2D的命名空间中。,18,7.2.1图像的显示与处理,GDI+支持的图形格式有BMP、GIF、JPEG、EXIF等图形文件格式。,DrawImage方法,使用Graphics对象的DrawImage方法加载和显示图像。其步骤是：,（1）创建Image类,Bitmap是Image类的一个新对象。该对象表示要显示的图像。该对象必须是从Image类继承类的成员，如：,Dim myBitmap As New Bitmap(“c:imagesGone Fishing.bmp”),（2）创建Graphics对象,Dim g As Graphics=Label1.creatGraphics,（3）调用Graphics的DrawImage方法显示图像,g.DrawImage(myBitmap,1,1),DrawImage方法有多种重载方式，这里所用的方式是：,DrawImage(Image,Integer,Integer),19,
展开阅读全文