第6章图形图像和多媒体应用程序设计方法.pptVIP

第6章　图形图像和多媒体应用程序设计方法 [内容简介] 本章在分析“指针式时钟”和“VCD播放器”程序设计实例的基础上 主要介绍图形操作的基础知识和VB中开发多媒体应用程序的两种主要方式。 主要包括坐标系统、简单几何绘图、相关控件的使用方法等。 目的 通过本章的学习，你将能够利用VB提供的强大绘图功能和多媒体程序开发功能，轻松涉足多媒体编程世界，掌握简单几何图形的绘制方法，实现多媒体播放应用程序的设计。 [学习目标] 1．掌握图形图像的基本处理方法。 2．理解VB坐标系统的原理。 3．了解播放多媒体信息的基本方法 4．了解“指针式”时钟程序的设计方法 5．了解“多媒体”程序设计的方法 任务描述 1、任务概述 指针式时钟程序主要利用图形控件设计表盘，通过时钟控件控制指针的转动，用图形方法动态移动指针。 2、界面设计 控件 Form1 Shape:3-Circle Line:BorderStyle 2-Dash Timer: Interval 1000 Label: Caption 3,6,9,12 本例子是一个直角坐标系统，指定圆心为坐标原点，分、秒和时针都绕圆心作圆周运动。一周为2π。 代码设计 通用部分的变量声明： Const PI = 3.141592653 窗体的LOAD事件 Private Sub Form_Load() ‘设置用户坐标系统，指定新的坐标原点在原坐标系统的位置 Form1.Scale (-14, 14)-(14, -14) End Sub 计时器的代码 Private Sub Timer1_Timer() Dim x, y As Integer Dim s, m, h As Integer ‘定义计时变量 ‘计算当前的时、分秒数（从系统时间获得相关的值） s = Second(Time) m = Minute(Time) h = Hour(Time) Form1.Cls ‘清空窗体 ‘绘制时针，数字6是起放大作用的。 Form1.DrawWidth = 4 ‘设置线条的宽度 h = h + m / 60 ‘转换成小时数，即8点30转换为8.5 x = 6 * Sin(h * PI / 6) ‘计算线条另一端的X坐标 y = 6 * Cos(h * PI / 6) ‘计算线条另一端的X坐标 Form1.Line (0, 0)-(x, y) ‘画线条表示时针 代码 Form1.DrawWidth = 3 ‘设置线条的宽度 x = 8 * Sin(m * PI / 30) ‘计算线条另一端的X坐标 y = 8 * Cos(m * PI / 30) ‘计算线条另一端的X坐标 Form1.Line (0, 0)-(x, y) ‘画线条表示分针 Form1.DrawWidth = 2 x = 9 * Sin(s * PI / 30) y = 9 * Cos(s * PI / 30) Form1.Line (0, 0)-(x, y), vbRed ‘画红线表示秒针 End Sub 说明 VB的Sin和Cos函数是以弧度为计量的单位。在三个指针的运动中，表示秒针的线条，每60秒转动一周，每秒钟转动2π/60弧度，即π/30。分针60分钟转动一周，每分钟转动2π/60弧度，即π/30。时针每12小时转动一周，每小时转动2π/12弧度，即π/6。 6.1.2VCD播放应用程序 1、任务概述 能够浏览要播放的文件，并播放.avi、.dat和.wav等格式的多媒体文件。程序有快进、快退、暂停、出碟和退出等基本功能。 运行界面 （1）界面设计 在Form1窗体上添加一个Multimedia MCI 控件MMControl1，一个Slider控件Slider1，两个Command控件Command1和Command2，一个CommonDialog控件CommonDialog1和一个Picture控件Picture1。 代码设计 Private Sub Form_Load() 将Picture1设置为视频回放的界面 MMControl1.hWndDisplay = Picture1.hWnd End Sub Private Sub Form_Unload(Cancel As Integer) 关闭多媒体设备 MMControl1.Command = Stop MMControl1.Command = Close End Sub 进度显示 Private Sub MMCon