用户自定义类型03 零基础入门学习Delphi33

用户自定义类型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]