(delphi11最新学习资料) Object Pascal 学习笔记---第5章第2节(记录数据类型)

5.2 记录数据类型

​ 数组定义了由数字索引引用的相同条目的列表,而记录定义了通过名字引用的不同类型元素的组合。换句话说,记录是一个具有特定数据类型的命名项目或字段的列表。记录类型的定义列出了所有这些字段,为每个字段赋予一个用于可引用的名称。在Pascal的早期阶段,记录只能有字段,现在记录还可以有方法和运算符,我们将在本章中看到。

注解: 记录在大多数编程语言中都可用。它们在C语言中使用struct关键字定义,在C++中进一步扩展了其定义,引入了方法,类似于Object Pascal。一些更"纯粹"的面向对象语言只有类的概念,没有记录或结构,但C#最近重新引入了这个概念。

​ 以下是一个小的代码片段(来自RecordsDemo示例),其中包含记录类型的定义,该类型的变量声明以及使用此变量的一些语句:

pascal 复制代码
type
  TMyDate = record
    Year: Integer;
    Month: Byte;
    Day: Byte;
  end;

var
  ABirthday: TMyDate;

begin
  ABirthday.Year := 1997;
  ABirthday.Month := 2;
  ABirthday.Day := 14;
  Show('Born in year ' + ABirthday.Year.ToString);
end;

注解: 术语"records"有时在使用中有些松散,可用于指代语言的两个不同元素:记录类型的定义和记录类型的变量(或记录实例)。"Record"用作"record type"和"record instance"的同义词,而类类型不同,在类的情况下,实例被称为对象。

Object Pascal 中,记录这种数据结构远不止一个简单的字段列表,本章的其余部分将对此进行说明,但我们从这种传统方式的记录开始。记录的内存通常分配在堆栈上用于局部变量,分配在全局内存中则用于全局变量。这通过调用SizeOf来突出显示,它返回变量或类型所需的字节数,如下语句所示:

pascal 复制代码
Show('Record size is ' + SizeOf(ABirthday).ToString);

在 Win32 系统中,使用默认编译器设置,返回值为 8(为什么返回值是 8 而不是 6---整数字段为 4 字节,每个字节字段为 2 字节--这将在字段对齐部分讨论)。

​ 换句话说,记录是值类型。这意味着,如果将一条记录赋值给另一条记录,就等于复制了一条完整的记录。如果对副本进行更改,原始记录不会受到影响。下面的代码片段用代码的形式解释了这一概念:

pascal 复制代码
var
  ABirthday: TMyDate;
  ADay: TMyDate;

begin
  ABirthday.Year := 1997;
  ABirthday.Month := 2;
  ABirthday.Day := 14;

  ADay := ABirthday;
  ADay.Year := 2008;

  Show(MyDateToString(ABirthday));
  Show(MyDateToString(ADay));
end;

输出(以日本或国际日期格式)是:

1997.2.14
2008.2.14

当将记录作为参数传递给函数时,也会发生相同的复制操作,就像我上面使用的MyDateToString函数:

pascal 复制代码
function MyDateToString(MyDate: TMyDate): string;
begin
  Result := MyDate.Year.ToString + '.' +
            MyDate.Month.ToString + '.' +
            MyDate.Day.ToString;
end;

​ 对该函数的每次调用都涉及记录数据的完整拷贝。为了避免复制,并在可能的情况下对原始记录进行修改,必须明确使用引用参数。下面的过程就强调了这一点:

pascal 复制代码
procedure IncreaseYear(var MyDate: TMyDate);
begin
  Inc(MyDate.Year);
end;

var
  ADay: TMyDate;

begin
  ADay.Year := 2020;
  ADay.Month := 3;
  ADay.Day := 18;

  IncreaseYear(ADay);

  Show(MyDateToString(ADay));
end;

通过过程的调用,原始记录的年份字段的值增加了,最终输出比输入晚一年:

2021.3.18
相关推荐
cuisidong199727 分钟前
5G学习笔记三之物理层、数据链路层、RRC层协议
笔记·学习·5g
乌恩大侠29 分钟前
5G周边知识笔记
笔记·5g
南宫理的日知录35 分钟前
99、Python并发编程:多线程的问题、临界资源以及同步机制
开发语言·python·学习·编程学习
数据与后端架构提升之路1 小时前
从神经元到神经网络:深度学习的进化之旅
人工智能·神经网络·学习
一行12 小时前
电脑蓝屏debug学习
学习·电脑
咔叽布吉2 小时前
【论文阅读笔记】CamoFormer: Masked Separable Attention for Camouflaged Object Detection
论文阅读·笔记·目标检测
johnny2332 小时前
《大模型应用开发极简入门》笔记
笔记·chatgpt
亦枫Leonlew2 小时前
微积分复习笔记 Calculus Volume 1 - 4.7 Applied Optimization Problems
笔记·数学·微积分·1024程序员节
小肥象不是小飞象2 小时前
(六千字心得笔记)零基础C语言入门第八课——函数(上)
c语言·开发语言·笔记·1024程序员节
星LZX2 小时前
WireShark入门学习笔记
笔记·学习·wireshark