1.枚举类型定义：
2.类型类型可以用 顺数函数ord,pred,succ,low,high操作
var week : days; color : colors; temp :Variant;begin// temp:=Ord(Monday); //返回 1// temp:=Pred(Tuesday); //返回 1// temp:=Pred(Sunday); //返回 255// temp:=Succ(Tuesday); //返回 3// temp:=Succ(saturday); //返回 7// temp:=Low(week); //返回 0// temp:=High(week); //返回 6 ShowMessage(temp);end;
3.枚举类型变量只能进行赋值运算和关系运算，不能进行算术运算和逻辑运算。
//合法性： week := Sunday; if week=Sunday then write(‘rest‘);//不合法的: Sunday := 1; //错把枚举值当成变量名； days := blue； //枚举值blue不属于枚举变量weekday的值域； read(color); //枚举类型变量 不能用读语句进行赋值； write(week); writeln(blue);//不能通过写语句输出枚举类型的变量值和枚举值。
4.枚举类型应用：
temp:=StrToInt(Edit1.Text); case temp of 0:week:=Sunday; 1:week:=Monday; 2:week:=Tuesday; 3:week:=Wednesday; 4:week:=Thursday; 5:week:=Friday; 6:week:=Saturday; end;
原文：http://www.cnblogs.com/delphiclub/p/4167957.html