第10章 多媒体应用设计.ppt

1、 Delphi 程序设计,南昌理工学院计算机系,主讲：陈强, Delphi 程序设计,第1章 Delphi 2005简介 第2章 Object Pascal语言基础 第3章 Windows应用程序界面设计 第4章 菜单、工具栏和对话框 第5章 使用复杂组件 第6章 面向对象的核心特性 第7章 多文档界面设计 第8章 程序调试与异常处理 第9章 文件操作和流 第10章 多媒体应用设计 第11章 数据库应用设计 第12章 综合应用设计, Delphi 程序设计,第10章 多媒体应用设计,10.1 多媒体技术 10.2 图形设计 10.3 图像处理 10.4 视频播放组件, Delphi 程序设计,

2、10.1 多媒体技术,10.1.1 多媒体技术的基本概念 10.1.2 多媒体信息的数字化, Delphi 程序设计,10.1.1 多媒体技术的基本概念,多媒体与多媒体技术 多媒体信息的类型 文本 图形 图像 动画 音频 视频, Delphi 程序设计,10.1.2 多媒体信息的数字化,数据压缩的国际标准 JPEG标准 MPEG标准 图形图像文件格式 BMP（.bmp）文件格式 JPEG（.jpg）文件格式 WMF（.wmf）文件格式 GIF（.gif）文件格式,数字音频的文件格式 WAV（.wav）文件格式 MIDI（.mid）文件格式 MPEG（.mp1/.mp2/.mp3） RA（.ra

3、）文件格式 数字视频的文件格式 AVI（.avi）文件格式 MOV（.mov）文件格式 MPG/MPEG（.mpg/.mpeg） DAT（.dat）文件格式, Delphi 程序设计,10.2 图形设计,10.2.1 Canvas画布对象 10.2.2 绘图方法 10.2.3 窗口绘图事件 10.2.4 响应鼠标事件, Delphi 程序设计,10.2.1 Canvas画布对象,Pen画笔 Color属性：控制线条的颜色。 Mode属性：控制线条的模式 Style属性：控制线条的风格，包括实线、虚线和点划线 Width属性：控制线条的宽度。 Brush刷子 Color属性：确定图形的填充颜色。

4、 Style属性：确定图形的填充方式。 Pixels像素 PenPos画笔位置, Delphi 程序设计,10.2.2 绘图方法,绘图的坐标体系, Delphi 程序设计,10.2.2 绘图方法,绘制直线 Canvas.MoveTo(x1,y1);/定位(x1,y1) Canvas.LineTo(x2,y2); /在(x1,y1)和(x2,y2)之间画线 绘制矩形 procedure Rectangle(x1,y1,x2,y2:integer); 绘制椭圆 procedure Ellipse(x1,y1,x2,y2:integer); 填充多边形 procedure Polygon(Point

5、s:array of TPoint); 显示字符串 procedure TextOut(x,y;integer;const Text:string);, Delphi 程序设计,10.2.3 窗口绘图事件,Form的OnPaint事件 Repaint方法立即刷新 【例10.1】 绘制四叶玫瑰线。 【例10.2】 显示系统字体。, Delphi 程序设计,10.2.4 响应鼠标事件,当鼠标按下时发生OnMouseDown事件 当鼠标松开时发生OnMouseUp事件 当鼠标移动时发生OnMouseMove事件 【例10.3】 显示鼠标经过的路径。 【例10.4】 拖动鼠标画直线。 【例10.5】

6、拖动鼠标画直线并显示直线的动态变化情况。, Delphi 程序设计,10.3 图像处理,10.3.1 图形图像组件 10.3.2 图像类, Delphi 程序设计,10.3.1 图形图像组件,PaintBox绘图区域组件 Shape显示图形组件 Image绘图及显示图像组件 Picture属性 AutoSize属性 Stretch属性 Center属性 Transparent属性 【例10.6】 图像动画设计。 图像对话框：OpenPictureDialog和SavePictureDialog, Delphi 程序设计,10.3.2 图像类,TGraphic类及其子类TBitmap、TIcon

7、、TMetafile和TJPEGImage TGraphic类的属性和方法： Empty只读属性：取值为true时，没有图像数据。 Width和Height属性：控制图像的宽度和高度。 LoadFromFile和SaveToFile方法：读取和保存图像文件。 【例10.7】 复制ImageList中的图标对象。 【例10.8】 图像文件格式转换。, Delphi 程序设计,10.3.2 图像类,TPicture类 TPicture类可以处理多种类型的图像文件 读取、显示与保存图像 var bmp1:TBitmap; bmp1:=TBitmap.Create; /创建TBitmap实例 bmp1

8、.LoadFromFile(C:WINDOWSClouds.bmp); /只能读取BMP图像 Form1.Canvas.Draw(0,0,bmp1); /图像显示在窗体上 bmp1.Free;/释放图像对象 打印图像TPrinter类 【例10.9】 保存在窗体上绘制图形后的图像文件。, Delphi 程序设计,10.4 视频播放组件,10.4.1 Animate组件 10.4.2 MediaPlayer组件, Delphi 程序设计,10.4.1 Animate组件,Animate组件播放动画使用的两种不同资源 AVI文件，需要设置Animate组件的FileName属性。 Windows内部动画，需要选择Animate组件的CommandAVI属性为某个常量值。 Animate组件的主要属性 Active属性 CommandAVI属性 FileName属性 Animate组件的方法和事件 【例10.10】 使用Animate组件播放动画并显示动画信息。, Delphi 程序设计,10.4.2 MediaPlayer组件,MediaPlayer组件的命令按钮 MediaPlayer组件的属性 AutoEnable属性 AutoOpen属性 AutoRewind属性