pascal编程语言中 声明 record 类型中的 case 用法,多谢

日期:2013-06-14 20:31:17 人气:1

pascal编程语言中 声明 record 类型中的 case 用法,多谢

type BirthOrAge=(BirthFlag, AgeFlag); PersonType=record id: string[18]; name: string[50]; gender: (male, female); case flag: BirthOrAge of BirthFlag: (birthday: longint); AgeFlag: (age: 0..150); end; // birthday
    A+
热门评论