delphi 語言一個強大之處,就在於可以根據需要自定義各種資料型別,開發者可以定義自己的資料型別,如子界型別、陣列型別、記錄型別、列舉型別、指標型別和集合型別,最重要的使用者定義資料型別是類(class)。
在 delphi 語言裡,定義一個自定義資料型別,只需要將定義放在 type 關鍵字下即可。
通常,delphi 語言的編碼規範裡,將所有的資料型別、類名稱,都以 T 開頭,因此,大多數的自定義資料型別如下所示例:
一個相對比較複雜一點自定義資料型別:
當自定義資料型別之後,就可以宣告該型別的變數,並進行使用了,以下是示例程式碼:
procedure TForm1.Button1Click(Sender: TObject);
var
mydata: TPerson; //宣告自定義的資料型別變數
begin
mydata.Name := "張三";
mydata.Sex := "男";
with mydata.Birthday do
Year := 1990;
Month := 2;
Day := 18;
end;
with mydata do
ShowMessage(Format("姓名:%s"#13#10"性別:%s"#13#10"出生日期:%d年%d月%d日",
[Name,Sex,Birthday.Year,Birthday.Month,Birthday.Day]));
程式碼執行截圖:
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;
程式碼執行截圖: