Delphi程序设计
- 格式：docx
- 大小：77.47 KB
- 文档页数：3
《Delphi程序设计》课程设计文档
姓名：王康
学号：2011404010334
班级：11级计算机科学与技术3班
课程设计：简单动画
指导老师：贺体刚
时间：2013.12.26
第一章课程设计要求
本课程设计要求利用画布，画笔、画刷的一些相关属性和方法来绘制一个图形
基本要求：
1．给出一条运动轨迹（可以是某函数曲线，但不能是数轴和正余弦函数）。
2．红色小球沿该轨迹从起点运动到终点。
1.1图形图像组件介绍
1.Image组件
Image组件是一个容器组件。
它在应用程序窗口中提供了一个矩形区域，用于显示和输出位图、图标、图元文件或用户自定义的图形文件。
在应用程序运行时它是不可见的。
2.Shape组件
Shape组件用于在窗体中绘制几何图形，如图形、矩形和圆角矩形等，该组件的常用属性有以下几种。
（1）Shape：指明需要绘制的几何图形，它可能取值如下表
（2）Brush
（3）Pen：指定几何图形所使用的线型。
3.PaintBox组件
PaintBox组件是一个简单的画板，它为应用程序提供了可在窗体的特定矩形区域内画圆的方法。
它和Image组件不同，Image组件用于显示已经保存在文件中的图像，而该组件需要应用程序直接在窗体上进行绘制。
PaintBox组件主要属性有以下几种：
(1)Anchors属性。
Anchors属性包含四个子属性（aKLeft、aKTop、aKRight和akBottom）;
(2)BoundsRect属性。
BoundsRect属性用来指定组件的矩形边界;
(3)Canvas属性。
Canvas属性仅在运行时有效，使用该属性可以在组件表面的特定区域
进行绘图;
(4)Color属性。
Color属性可用于除“颜色”对话框以外的所有组件或对象;
(5)Constaints属性。
Constaints属性强制指定组件大小。
它的子属性有MaxHeight、
MinHeight、MaxWidth和MinWidth四中。
1.2实现方法和风格介绍
1、课程设计TCanvas的绘图方法
（1）LineTo（x，y：Integer）：从当前位置画一条至点（x，y）所指定的位置的线，并把笔的位置移至点（x，y）;
（2）MoveTo（x，y：Integer）：将笔的当前位置设置到店（x，Y）处；
（3）Ellipse（x1，y1，x2，y2：Integer）在话不指定的矩形边界上画一个椭圆，点（x1，y1）是矩形左上角的像素坐标，点（x2,y2）是矩形右下角的像素坐标。
2.绘制的相应对象
TColor类型用于定义一个对象的颜色。
很多的部件的颜色属性口试TColor类型，在Graphics单元中的TColor定义如下：直接映射成系统调色板中的颜色有：
ClAqua、ClBlue、ClBlack、ClBkGrray、…、ClYellow
第二章界面设置
2.1窗体的设置
打开Delphi新建一个Unit1，在Form1上添加一个Button按钮，两个Bitbtn按钮，其名称都为默认名，分别为Button1、Bitbtn1、Bitbtn2、修改Form1、Button1、Bitbtn1、Bitbtn2的相关属性，如下图;
图（1）界面的设置
2.2绘制按钮
绘制按钮（即Button2）的响应事件代码编写如下。
