Delphi 数据类型

一.类型定义 ? ? ? 对于每一种自定义数据类型，必须遵循“先定义，后使用”的原则。类型定义的语法格式为： ? ? ? [格式]： ? ? ? type 类型名=类型； ? ? ? [说明]： ? ? ? type是保留字。类型名的命名要符合自定义标识符的命名规则。每种类型的定义都有各自的语法。 ? ? ? ? 类型定义出现在程序说明部分。? 二.枚举类型和子界类型 ? ? ? ? 枚举类型和子界类型都属于顺序类型，是两种用户自定义的简单数据类型。 ? ? ? 1．枚举类型 ? ? ? [格式]： ? ? ? type 类型名=(值1,...,值n)； ? ? ? [说明]： ? ? “type”为保留字，表示类型定义的开始 ? ? “类型名”为任意合法的自定义标识符 ? ? “值1”、“值2”…“值n”均为自定义标识符，是枚 ? 举类型中的所有数据元素，也称枚举常量 ? ? ?枚举常量的序号从0开始依次向后计数，即“值1”的序号为0，“值2”的序号为1，依此类推。 三.子界类型 ? ? ? ?子界类型指的是某个顺序类型（称为基类）的一个子集。定义子界类型的语法格式是： ? ? ? ? type 类型名=下界值..上界值; ? ? ? ? 例如： ? ? ? ? type ?month=1..12; ?? ? ? ? ? //定义子界类型month ? ? ? ? var ?months:month; ?//定义months为属于子界类型month的变量? 四.数组类型 ? ? ? ?1．一维静态数组的定义与使用 ? ? ? ?一维静态数组类型的定义格式为： ? ? ? ?type 数组类型名=array[下标类型] of 基类型； ? ? ? ? [说明]： ? ? ? ? array是保留字。[下标类型]一般为子界型； ? ? ? ? 基类型是数组元素的类型，可以为任意类型。 ? ? ? ? 例如，下面定义一个一维数组类型num： ? ? ? ? type num=array[1..5] of integer;? 五.二维静态数组的定义与使用 ? ? ? ? 二维静态数组比一维数组多一个下标，定义格式为： ? ? ? ? [格式1]： ? ? ? ? type 数组类型名=array[下标类型1，下标类型2] of ? 基类型； ? ? ? ? [格式2]： ? ? ? ? type 数组类型名=array[下标类型1] of array [下标类型2] of 基类型； ? ? ? ? 例如： ? ? ? ? Type ? ?atype=array[1..10,1..10] of integer; ? ? ? ? ? ? ? ? ? ? btype=array[1..4,1..3] of real; ? ? ? ? 二维静态数组类型定义之后，还要声明二维数组变量，声明方式与一维数组相似。? 六.动态数组的定义与使用 ? ? ? ? 静态数组在使用之前其类型及元素的个数均已确定，而动态数组没有固定的大小或长度，因此在程序运行时可为动态数组动态地分配存储空间。 ? ? ? ? 一维动态数组的定义格式为： ? ? ? ? type? ? ? ? ? 数组类型名=array ?of ?基类型; ? ? ? ? 多维动态数组的定义格式为： ? ? ? ? type? ? ? ? ? 数组类型名=array of array of…array ?of ?基类型; 七.集合类型 ? ? ? ?1．集合类型的定义 ? ? ? ? 集合（set）是具有相同性质但又可以区分开来的一组元素的整体。定义集合类型的一般格式为： ? ? ? ? [格式]： ? ? ? ? type 集合类型名=set of 基类型； ? ? ? ? [说明]：set、of是保留字。基类型即集合元素的类型，通常是：字符型、布尔型、枚举型和子界型四种顺序类型。集合元素个数不能超过256个，集合元素没有次序关系。? 八.集合类型的运算 ? ? ? ?（1）集合类型的值 ? ? ? ? 集合类型的值放在一对方括号中，多个元素间用逗号分隔，或用子界方式表示连续的元素，每个元素可以表示为元素类型允许的表达式。 ? ? ? ? 例如： ? ? ? ? [‘a’..’z’] ?//包含小写字母集合常量 ? ? ? ? [0..9,20] ?//包含0到9及20的整数集合常量 ? ? ? ?（2）赋值运算 ? ? ? ? 可以对集合变量进行赋值运算。例如： ? ? ? ? var s:set of 1..2; ? ? ? ? si:set of 0..100; ? ? ? ? s:=[ ]; ?//[ ]表示空集 ? ? ? ? si:=[1..10,20]; 九.关系运算 ? ? ? ?关系运算符=、<>用于比较两个集合是否相等。<=（包含于）、>=（包含）用于测试一个集合是否为另一个集合的子集。 ? ? ? ? ? ? ? ?例如： ? ? ? ?[1,2]<=[1..6] ? ?//结果为true ? ? ? ?[1,2]=[2,1] ? ? ?//结果为true ? ? ? ?[1,2]>=[1..6] ? ?//结果为false ? ? ? ?注意：集合中没有<和>运算。 十.属于运算（in） ? ? ? ?保留字in是一个关系运算符，用于测试集合元素类型的元素是否在某个集合中。例如： ? ? ? ?1 in [1..9] ? ? ?//结果为true ? ? ? ?‘a’ in [‘a’..’z’] ?//结果为true ? ? ? （5）集合运算 ? ? ? ?集合运算符有+（并）、-（差）、*（交）。运算规则同数学中的集合运算。例如： ? ? ? ?[1..3]+[3，5，7] ? //结果为[1..3,5,7] ? ? ? ?[1，2，3]*[] ? ? ?//结果为[] ? ? ? ?[1..3]-[3，5，7] ? //结果为[1,2] 十一.字符串类型 ? ? ? ? 字符串类型（string）是以字符为元素类型的一维数组，并且在字符数组的基础上增加了许多功能。 ? ? ? ? 1.字符串类型定义格式 ? ? ? ? [格式]： ? ? ? ? type 字符串类型名=string[长度]； ? ? ? ? [说明]：string保留字。[长度]省略，表示字符串长度不确定。 ? ? ? ? 例如： ? ? ? ? type string20=string[20]; ? ? ? ? ? //定义字符串类型string20，字符串最大长度为20 ? ? ? ? var s:string20; ? ?//定义字符串类型变量s，最大长度为20 。 十二.字符串的运算 ? ? ? ?（1）字符串元素的运算 ? ? ? ? s[1]:=‘a’; ? ?//对字符串第一个字符所在存储单元赋值为’a’ ? ? ? ?（2）字符串变量的运算： ? ? ? ? 对字符串变量可以进行赋值、读、写、比较、连接等运算。例如： ? ? ? ? ? ? s:=‘china’; ? ? ? ? ? ? readln(s); ?writeln(s); ? ? ? ? ? ? ? s:=‘china’+‘nanjing’; ? ? ? ? ? ? if ?s>‘abcde’ ?then ?s:=‘123’; ? ? ? ?（3）求字符串长度 ? ? ? ? 用标准函数length(s)可以返回字符串s的长度。 ? ? ? ? 当length(s)=0表示字符串s为空字符串。? 十三.记录类型 ? ? ? ? 1．记录类型的定义 ? ? ? ? 记录类型是一个不同种类元素的集合，每个元素称为字段（field）。在类型定义时，指定记录类型的名字和每个字段名。声明格式为： ? ? ? ? type ? ? ? ? ? 记录类型名=record ? ? ? ? ? ? ?字段1:类型1; ? ? ? ? ? ? ?字段2:类型2; ? ? ? ? ? ? ?…… ? ? ? ? ? ? ?字段n:类型 n; ? ? ? ? end; 十四.记录类型的使用 ? ? ? ? （1）限定访问记录字段 ? ? ? ? ?[格式]： ? ? ? ? ?记录类型变量名.字段名 ? ? ? ? ?[说明]：该格式为访问记录类型变量的某个字段。“.”是限定标识符，不能省略。 ? ? ? ? ?例如，访问记录类型变量stu ? ? ? ? ?read(stu.no); ? ?? ? ? ? ? ?//访问stu变量的no字段，并通过键盘输入其数值。 ? ? ? ? stu.name:=‘liping’; ? ? ? ? ? //访问stu变量的name字段，并对其赋值。 十五.使用开域（with）语句访问记录字段 ? ? ? ? ? ?[格式]： ? ? ? ? ? ?With 记录变量名 do? ? ? ? ? ? ? ? ?语句； ? ? ? ? ? ?[说明]：用with打开“记录类型变量名”指定的变量，下面访问其字段时就不需要再在字段名前加“记录类型变量名”了。例如： ? ? ? ? ? ? ? with stu do ? ? ? ? ? ? ? ? ?begin ? ? ? ? ? ? ? ? ? ? ?read(no); ? ? ? ? ? ? ? ? ? ? ? ? ?//省略字段名前的小圆点和记录类型变量名 ? ? ? ? ? ? ? ? ? ? ?name:=‘liping’; ? ? ? ? ? ? ? ? ? ? ?sex:=male; ? ? ? ? ? ? ? ? ? ? ?age:=18; ? ? ? ? ? ? ? ? ?end; 十六.记录数组 ? ? ? ? 如果记录作为数组元素的类型，则称为记录数组。 ? ? ? ? 例如： ? ? ? ? var ?class:array[1..50] of student; ? ? ? ? 说明class是一个具有50个元素的数组，数组元素的类型是前面定义的记录类型student。 ? ? ? ? class[1]代表第一条学生记录。? 十七.文件类型 ? ? ? ?在计算机系统中，存放在外存储器中的数据集合称为文件（file）。在delphi中，文件类型是由相同类型的元素组成的有序集合。文件类型的声明格式为： ? ? ? ? type ? ? ? ? 文件类型名 = file of 基类型; ? ? ? ? 例如，声明一个文件类型RecordList，以上面定义的TdateRec为数据类型。 ? ? ? ? type ? ? ? ? RecordList = file of TdateRec; ? ? ? ? var? ? ? ? ? Myrecordlist:RecordList; 十八.指针所指向的动态变量 ? ? ? ? 引用指针所指向的动态变量，可采用如下格式： ? ? ? ? 指针变量^ ? ? ? ? 例如： ? ? ? ? 指针p指向的动态变量为p^。 ? ? ? ? 若p^的类型为integer，则可对p^进行如下操作： ? ? ? ? P^:=10; ?p^:=p^+20;? ? ? ? ? readln(p^); ?writeln(p^); 十九.对指针变量的操作 ? ? ? ? （1）指针赋空值 ? ? ? ? ? p:=nil; ? ? ? ? ? ? ?{nil是指针类型的常量，表示空值，可赋给任意指针变量，表示指针不指向动态变量} ? ? ? ? （2）指针获得变量的地址 ? ? ? ? ?用运算符@可获得变量的地址。 ? ? ? ? ?var ? ? ? ? ? i:integer; ? ? ? ? ? p:^integer; ? ? ? ? ? i:=10; ? ?//对整型变量i赋值为10 ? ? ? ? ? p:=@i; ? //获得变量i的地址并赋给指针变量p ? ? ? ? ? writeln(p^); ? //输出p^的值，结果是10 ? ? ? ? ? （3）赋给另一指针值 ? ? ? ? ? 两个基类型相同的指针变量可以进行赋值。例如： ? ? ? ? ? var p,q:^integer; ? ? ? ? ? ?i:integer; ? ? ? ? ? ?p:=@i; ? //获得变量i的地址并赋给指针变量p ? ? ? ? ? ?q:=p; ? ?//赋值后，p、q指向同一个动态变量，即有相同的地址 ? ? ? ? ?（4）关系运算（=、<>） ? ? ? ? ? 两个相同基类型的指针可以进行=、<>运算。 ? ? ? ? ? If ?p=q ?then ?q^:=10 ; ? ? ? ? ? ? //两指针相等时，表示指向同一个动态变量 ? ? ? ? ?（5）标准过程new和dispose