用户自定义类型03

 

让编程改变世界

Change the world by program

---

 

记录类型的定义与使用

  前边我们讲过的几种类型的共同点是所属元素必须属于相同的类型。 而现实生活中我们常常需要把不同类型的数据组合在一起。 例如最新的鱼C论坛的账号，它包含很多信息：昵称、注册日期、性别、爱好等。 这些数据就不属于相同的类型，为了处理如鱼C论坛账号这样的由多种不同类型数据组成的实体，在Delphi中引入了记录类型其实相当于 C 语言的结构。  

记录类型的定义格式与功能如下

[codesyntax lang="delphi"]

type    记录类型标识符 = Record        字段1:类型1;        字段2:类型2;        …        字段n:类型n;    end;

[/codesyntax]    

下边我们定义鱼C论坛账号的记录类型演示 [codesyntax lang="delphi"]

Type    Fishoil = Record;        name: String;        rdate: Integer; 	// 20111203        sex: Char;      	// ‘M’ or ‘F’        hobby: String;    end;  	                // 注意要加上这个

[/codesyntax]  

定义了记录类型后，就可以声明记录变量了，声明记录型变量与声明其他类型变量基本相同。  

使用记录类型的关键是如何访问记录变量的字段，有两种访问字段的方法：

1. 限定访问记录字段
2. 使用With语句。

  【限定访问记录字段】记录变量名.字段名 [codesyntax lang="delphi"]

var	fish1: Fishoil;fish1.name:= ‘小甲鱼’;

[/codesyntax]   【使用With语句访问记录字段】 [codesyntax lang="delphi"]

With 记录变量名 Do begin	name: ‘小甲鱼’;	rdate: 20111203	sex: ‘M’	hobby: 'Programming';ends// 提醒：With语句也可以嵌套。

[/codesyntax]  

【例题演示】鱼C账号记录程序（）  

小技巧：

1. Options.GoColSizing 设置为 True 允许手动调整列宽，行宽即同理设置Options.GoRowSizing 2. TabOrder 设置为 0 3. InputBox 对中文支持极度不好，在我们还没学自己画窗体的时候，先请用空格顶着 [buy]   [/buy] [Downlink href='http://kuai.xunlei.com/d/LYIJNZANEWAW']视频下载[/Downlink]