杭州交通信息网g2000服装:delphi 枚举类型
来源：百度文库 编辑：杭州交通信息网 时间：2024/05/06 00:52:16
type
todd=(1,2);
end;
枚举这样子写对吗？
todd=(1,2);
end;
枚举这样子写对吗？
基本上是对的。不过，不用加end
要定义并用枚举类型，分为两步
1 定义
eg:
type color=(blue,green,black,white,maroon);
析：定义了一个名为color的枚举类型，其可能的值为
blue,green,black,white,maroon.它可放在实现部分（implementation）前。
2 声明变量赋值
由于在编译的过程 中，编译器会按照这些枚举常量的顺序依次赋值为0,1,2,3,4.所以，在赋值中可以用下面的语句。
var
mycolor:color;
mycolor:=0; 此处，也可以写成 mycolor:=blue;
可以用ord(),这一函数来验证一下，
eg
mycolor:=blue;
showmessage(inttostr(ord(c)));
朋友，不知道你看懂了没有。
对啊！
定义变量就是
var
any:todd;