1、定义  枚举类型是一组由有效的标识符代表的有序数值的集合。2、声明方法  type    TMyCongregate = (val1..valn);//其中类别名和val都是符合语法规则的标识符。  或  var    MyCongregate: (val1..valn);//注意，这种声明方式会导致相同的数值范围只能用一个变量表示。  //如,下面这种声明方式将导致编译器报错。  var    myCongregate1: (Green, yellow, blue);    myCongregate2: (Green, yellow, blue);  //下面的声明方式就不会产生编译器错误  type    TMyCongregate = (Green, yellow, blue);  var    myCongregate1: TMyCongregate;    myCongregate2: TMyCongregate;3、赋值运算  //声明同上  myCongregate1 := Green;4、逻辑运算  //声明同上  myCongregate1 := Green;  myCongregate2 := blue;  if myCongregate1 > myCongregate2 then {do Something}  //枚举类型值的大小和其值在声明中的顺序相关(此处为本人估计)，当然也能用下面方法在声明时指定顺序值。  type    TMyCongregate = (Green = 5, yellow = 10, blue = Green + yellow);  5、其它应用  myCongregate1 := Green;  case myCongregate1 of    yellow:ShowMessage('yellow');    blue: ShowMessage('blue');    green: ShowMessage('Green');  end;

评论