高级数据类型
枚举类型
Type
WeekDays=(Sunday,Monday,Tuesday,Wednesday,Thursday,Friday,Saturday);
Var
WeekDay:WeekDays;
--------------------------------------------或者直接声明
或者直接声明
Var
WeekDay:(Sunday,Monday,Tuesday,Wednesday,Thursday,Friday,Saturday);
子界类型
Type
Months=1..12;
Caps='A'..'Z';
Var
Month:Months:
--------------------------------------------或者直接声明
或者直接声明
Var
Month:1..12:
集合类型
Type
Numbers=set of byte;
Var
Number:Numbers:
--------------------------------------------或者直接声明
或者直接声明
Var
Number:set of Byte;
数组类型
Type
CompanyName=Array [1..20]of string;
Var
MyCompany:CompanyName;
--------------------------------------------或者直接声明
或者直接声明
Var
MyCompany:Array [1..20]of string;
记录类型
Type
Student=record
Name:String;
Age:integer;
Grade:String;
Addr:String;
End;
Var
CollageStudent:Student;
--------------------------------------------或者直接声明
Var
CollageStudent:Record
Name:String;
Age:integer;
Grade:String;
Addr:String;
End;
文件类型
Type
TMingRiFile=file of integer;
类 类型
Type
类名=Class(父类名)
域
属性
方法
End;
--------------------------------------------例如
Type
Tperson=class(Tobject)
Name:String;
Age:integer;
Addr:String;
Procedure SetAge(Value:integer);
Function GetAge:integer;
End;
指针类型
Type
TmingRi=^integer;
变体类型
声明了Variant类型后,可以赋给它除了Int64和结构类型以外的所有类型的值;当其出现在赋值语句和表达式中时,编译器将自动完成类型转换。
Var
MyVariant:Variant;
begin
MyVariant:=200; //integer类型值
MyVariant:='MingRiSoft'; //real类型值
MyVariant:=123.4567; //string类型值
MyVariant:=true; //boolean类型值
end;
《Delphi应用开发完全手册》p24
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】凌霞软件回馈社区,博客园 & 1Panel & Halo 联合会员上线
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】博客园社区专享云产品让利特惠,阿里云新客6.5折上折
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· DeepSeek “源神”启动!「GitHub 热点速览」
· 微软正式发布.NET 10 Preview 1:开启下一代开发框架新篇章
· 我与微信审核的“相爱相杀”看个人小程序副业
· C# 集成 DeepSeek 模型实现 AI 私有化(本地部署与 API 调用教程)
· spring官宣接入deepseek,真的太香了~