Delphi 程序设计-课件 第四章 高级数据类型新.pptVIP

第 4 章 高级数据类型 教学目的 ? 掌握类型的声明和变量的定义 ? 掌握枚举、子界、集合、记录类型的定义和使用方法 ? 掌握静态数组的定义和使用方法 ? 掌握动态数组的定义和使用方法 掌握记录类型的定义和使用方法 掌握指针的基本概念和指针的使用 高级数据类型包括是枚举、子界、集合、数组、记录和指针等类型。本章将着重介绍Delphi中数组、记录、指针的定义和使用方法。数组是由基本数据类型构造的一种数据类型，它是由一组相同类型数据组成的有序集合，是用来解决一批相同类型数据的存储问题。相反，记录是用来解决一批不同类型数据的存储问题，Delphi语言提供了丰富的数据类型及其使用方法，利用这些类型用户可以方便地组织和使用数据。 2. 枚举类型变量的定义 声明了枚举类型之后，就可以用所声明的枚举类型定义变量了，这与定义其他类型的变量完全相同。其语法格式为： Var 变量标识符1，变量标识符2，…，变量标识符n:枚举类型标识符; 除了采用前面介绍的方式定义枚举类型的变量之外，还可以将枚举类型的声明和枚举类型变量的定义合并在一起，例如： Var I:(red=2,green=6, white=7,black=9); 但是用这种方法定义枚举类型变量之后，就不能够声明其他使用这些枚举常量定义的相同范围的枚举型变量，例如： Var Color1: (red=2,green=6, white=7,black=9); Var Color2: (red=2,green=6, white=7,black=9); 这样定义两个枚举型变量将产生一个编译错误。系统会提示类似于： “Identifier redeclared: ‘red’” 也就是说，枚举类型一旦声明，此枚举类型的任一元素都不能再重复被声明为其他枚举类型的元素之一，否则会导致编译错误。 3. 枚举类型的运算 枚举类型是用一些枚举常量表示的一组连续整数，枚举常量是一种符号常量，是整数的符号化表示。在运算过程中，可以直接对枚举常量进行关系运算；不能对枚举常量进行直接的算术运算，但可以通过函数对枚举常量进行间接的算术运算。 Delphi规定：每一个枚举类型常量都对应一个唯一的有序整数。对于一个具有n个值的枚举类型，其枚举常量从左到右依次对应的有序整数为（0…n-1）。 要获得枚举常量的值，可以通过Delphi提供的标准函数实现，常用的函数见表4-1所示。 表4-1 枚举常量计算函数 【例4.1】显示系统日期，并能返回昨天、今天和明天的星期。程序中的： Format()是格式化函数；Date是日期函数，其类型为TdateTime； DecodeDate(Date,year,month,day)是日期转换函数， 参数：Date是日期函数，year、month、day是无符号整型变量； DayOfWeek(Now)是星期函数，类型整型：1～7，1表示星期天，7表示星期六； Now是日期时间函数，其类型为TdateTime，返回系统当前日期和时间； 这些函数的具体使用请参阅第二章有关标准函数章节内容。 操作步骤如下： （1） 建立工程（默认工程名为Project1） 选择File︱New︱Application命令建立一个新的Windows应用程序。 （2） 在窗体Form1上添加控件并设置其属性 在Form1（默认窗体名）上添加一个Panel1控件，并将其Caption属性设置为：空； 最后添加3个命令按钮Button1、Button2、Button3，并将其Caption属性设置为：“昨天”、“今天”、“明天”，如图4.1所示。 （3） 建立事件过程 为Button1（排序）命令按钮控件添加OnClick事件，并在事件处理器中添加实现其功能的代码。双击Button1按钮，就会打开代码编辑器，在光标指示位置输入代码，程序单元的代码如下： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) Panel1: TPanel; Button1: TButton; Button2: TButton; Button3: TButton; procedure FormCreate(Sender: TO