delphi的record中 case 的问题

2025-02-23 13:34:56
推荐回答(1个)
回答1:

声明
TRect = record
case Integer of
0: (Left, Top, Right, Bottom: Integer);
1: (TopLeft, BottomRight: TPoint);
end;
中,Integer是数据类型,0和1是它的两个值,这个声明的意思是说内存中有一块区域存放了四个整型值,你可以用TRect.Left,TRect.Top...来访问,也可以用TRect.TopLeft来访问。用不到0和1这两个值的,他们仅仅为可读性而存在。