0

必须使用哪些关键字来创建变体记录?

4

2 回答 2

1

@osabiri 检查文档以获取与记录相关的免费帕斯卡。

Type  
  MyRec = Record  
          X : Longint;  
          Case byte of  
            2 : (Y : Longint;  
                 case byte of  
                 3 : (Z : Longint);  
                 );  
          end; 

重要的提示 :

变体部分必须在记录中的最后。case 语句中的可选标识符用于访问标记字段值,否则程序员将看不到该值。它可用于查看哪个变体在某个时间处于活动状态1。实际上,它在记录中引入了一个新字段。

检查这些链接

于 2010-06-17T22:15:50.933 回答
0

case:考虑来自http://docs.embarcadero.com/products/rad_studio/delphiAndcpp2009/HelpUpdate2/EN/html/devcommon/structuredtypes_xml.html的这个标准示例

TEmployee = record
  FirstName, LastName: string[40];
  BirthDate: TDate;
  case Salaried: Boolean of
    True: (AnnualSalary: Currency);
    False: (HourlyWage: Currency);
end;
于 2010-06-17T21:45:16.490 回答