delphi语法基础-枚举类型

减小字体 增大字体 作者:佚名  来源:本站整理  发布时间:2011-03-09 15:56:01

枚举类型
  Pascal程序不仅用于数值处理,还更广泛地用于处理非数值的数据。例如,性别、月份、星期几、颜色、单位名、学历、职业等。
 
1、枚举类型的定义
   格式: type 枚举类型标识符=(标识符1,标识符2,…,标识符n)

2、枚举类型数据特点

① 枚举元素只能是标识符;

例如,下列类型定义是合法的:
      type  days=(sun,mon,tue,wed,thu,fri,sat);
          colors=(red,yellow,blue,white,black,green);
       而下列类型定义是错误的:
     type colortype=('red','yellow','blue','white');
            numbers=(1,3,5,7,9);

定义枚举类型时列出的所有枚举元素构成了这种枚举类型的值域(取值范围)。
 

② 枚举类型属于顺序类型
   根据定义类型时各枚举元素的排列顺序确定它们的序号,且序号从0开始。

例如,定义type days=(sun,mon,tue,wed,thu,fri,sat);

则, ord(sun)=0,ord(mon)=1,……,以此类推。

枚举类型中的第一个元素无前趋,最后一个元素无后继。
       pred(sat)=fri; succ(sun)=mon; ord(sat)=6; 
 

③ 同一个枚举元素不能出现在两个或两个以上的枚举类型定义中。如下列定义是错误的:
   type color1=(red,yellow,white);
      color2=(blue,red,black); 

 因为red属于枚举类型color1和 color2
 
④ 枚举类型变量只能进行赋值运算和关系运算,不能进行算术运算和逻辑运算。
  在枚举元素比较时,实际上是对其序号的比较。

 例如定义如下:
    type days=(sun,mon,tue,wed,thu,fri,sat);
      colors=(red,yellow,blue,white,black,green);
    var color:colors;
      weekday:days;
 则下面语句是合法的:  weekday:=mon;
                     if weekday=sun then write('rest');
 而下面语句是不合法的:

mon:=1;           错把枚举值当成变量名;

weekday:=blue;   枚举值blue不属于枚举变量weekday的值域;

read(color);      枚举类型变量 不能用读语句进行赋值;

write(weekday); writeln(blue);不能通过写语句输出枚举类型的变量值和枚举值。
 

⑤ 可以把变量的说明与类型的定义合并在一起,如:
  var holiday,workday:(sun,mon,tue,wed,thu,fri,sat);
     color:(red,yellow,blue,white,black,green);

对枚举数据的输入与输出可通过间接方式进行。输入时,一般可输入一个代码,通过程序进行转换,输出时,也只是打印出与枚举元素相对应的字符串。这在后面的例题中将有使用示例。
 
二、枚举类型的应用
例1、输入今天是星期几的序号,输出明天是星期几的英文单词(星期天序号为0)。
  type weekday=(sun,mon,tue,wed,thu,fri,sat);
   var i : integer;
     today,tomorrow : weekday;
  begin
   writeln('What date is it'); readln(i);
   case i of                              { 根据输入转换成枚举型 }
    0:today:=sun;
    1:today:=mon;
    2:today:=tue;
    3:today:=wed;
    4:today:=thu;
    5:today:=fri;
    6:today:=sat;
   end;                          

if (today=sat) then tomorrow:=sun  else tomorrow:=succ(today);
    write('The tomorrow is ');   
   case tomorrow of
    sun:writeln('sunday');
    mon:writeln('monday');
    tue:writeln('tuesday');
    wed:writeln('wednesay');
    thu:writeln('thursday');
    fri:writeln('friday');
    sat:writeln('saturday');
   end;
  end.
    枚举类型是一种有序类型,所以枚举类型的变量可以作为循环变量。

    学习枚举类型时,注意枚举元素与变量的区别,以及枚举与变量的输入输出方法的处理。

Tags:

作者:佚名
  • 好的评价 如果您觉得此文章好,就请您
      100%(2)
  • 差的评价 如果您觉得此文章差,就请您
      0%(0)

文章评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论

广告位置B