怎么样在delphi中定义自定义数据类型

Question

如题所述

Answer 1

delphi 语言一个强大之处，就在于可以根据需要自定义各种数据类型，开发者可以定义自己的数据类型，如子界类型、数组类型、记录类型、枚举类型、指针类型和集合类型，最重要的用户定义数据类型是类（class）。

在 delphi 语言里，定义一个自定义数据类型，只需要将定义放在 type 关键字下即可。

通常，delphi 语言的编码规范里，将所有的数据类型、类名称，都以 T 开头，因此，大多数的自定义数据类型如下所示例：

一个相对比较复杂一点自定义数据类型：

当自定义数据类型之后，就可以声明该类型的变量，并进行使用了，以下是示例代码：

procedure TForm1.Button1Click(Sender: TObject);
var
  mydata: TPerson; //声明自定义的数据类型变量
begin
  mydata.Name := '张三';
  mydata.Sex := '男';
  with mydata.Birthday do
  begin
    Year := 1990;
    Month := 2;
    Day := 18;
  end;

  with mydata do
  begin
    ShowMessage(Format('姓名：%s'#13#10'性别：%s'#13#10'出生日期：%då¹´%d月%d日',
    [Name,Sex,Birthday.Year,Birthday.Month,Birthday.Day]));
  end;
end;

代码运行截图：